View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Vergel Adriano Vergel Adriano is offline
external usenet poster
 
Posts: 857
Default Returning the number of comments in a workbook

try something like

Sub test()
Dim lCommentCount As Long
Dim sht As Worksheet

For Each sht In ActiveWorkbook.Worksheets
lCommentCount = lCommentCount + sht.Comments.Count
Next sht
MsgBox lCommentCount & " total comments in the active workbook"
End Sub


--
Hope that helps.

Vergel Adriano


"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!