Returning the number of comments in a workbook
sub ABC()
Dim sh as worksheet
Dim cnt as Long
for each sh in Worksheets
cnt = sh.Comments.count + cnt
Next
msgbox "Comment count is " & cnt
End Sub
--
Regards,
Tom Ogilvy
"Sue" wrote:
I've figured out how to do it in a Word document, but the object model or
something must be different for Excel (2003).
How can I have a msgbox pop up and tell me how many comments are in a
workbook?
thank you!
|