how to extract cell note contents in Excel?

Hi All
Hope all doing great..

requirements -

i have to create a macro to open all excel workbooks (1000 workbooks ) from a folder and copy A2 cell data with note.

Output should be like below.

WB1.JPG
------------------------------
Workbook name Data Note
WB 1 110 This is for UK
WB 2 150 margin range
'
'
'
'
'
'
'
'
till last workbook data from folder

Please Login or Register  to view this content.

Thank you, somehow i am not getting note details in c column

getting below result
---------------------
WB 1.xlsx 110 Sheet1
WB 2.xlsx 150 Sheet1

I have edited the code,