exporting comments?

  • Thread starter Thread starter SirPoonga
  • Start date Start date
S

SirPoonga

I am in the process of converting a spreadsheet to an access database.
The sheets I am working with have several cell comments. I would
like to know how to access each comment of each sheet adn figure out
what sheet and cell it is in.

Thanks in advance
Kevin
 
Thanks, I got this working
<pre>

ff = FreeFile
Open "C:\comments.txt" For Output As #ff
For Each mySht In Worksheets
For Each mycomment In Worksheets(mySht.Name).Comments

Print #ff, Format(mycomment.Parent.Parent.Name, "!@@@@@@@@@@@@@") & _
Format(Number2Letter(mycomment.Parent.Column) & "," &
mycomment.Parent.row, "!@@@@@@") _
& mycomment.Text

Next mycomment
Next mySht
Close #ff

</pre>

Output looks like
SHEET1 L,63 A comment here
SHEET2 A,3 ANOTHER COMMENT
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top