Extract All Outlook Email to Excel using VBA

Question

i would like to extract all email (Received Date, Sender, Size Email, Subject, Attachments) in outlook to excel and i found this code from one of the webpage. Actually it works,