extract Comment from all workbook in new sheet NOT Note

Good evening all
im lookin g for extract all Comment in my workbook in new sheet with comment name and every comment with refer to cell number have comment
i found this cod but i think its work for note NOT for comment

Please Login or Register  to view this content.

i try to change line with comments to .CommentThreaded.Text but its doesn't work
i appreciate your support and help

Hi there,

See if the following code does what you need - it has been broken down into several routines/functions so that each performs only a single task:

Please Login or Register  to view this content.

Hope this helps - please let me know how you get on.

Regards,

Greg M

Hi again,

Many thanks for the Reputation increase - much appreciated!

Glad I was able to help.

Best regards,

Greg M