Understanding Worksheet.comments.count

[hoshi]

I am trying to add a feature that checks a workbook for the existence of comments.

I imagine that the "ActiveSheet.Comments.Count" would give me the count of the number of comments on the worksheet, however it is returning 0 for me.

Am i misunderstanding the usage of this?

Using Office 365

 

[DanteAmor]

Try this:

Sub testCommentCheck()
  MsgBox CommentsExistsWs(ActiveWorkbook.ActiveSheet)
End Sub

Function CommentsExistsWs(ws As Worksheet)
  CommentsExistsWs = ws.Comments.Count
End Function

 

[Michael M]

Try using

Sub MM1()
Dim rng As Range
On Error Resume Next
Set rng = activesheet.usedrange.SpecialCells(xlCellTypeComments)
If rng Is Nothing Then: MsgBox "No comments Found": Else: MsgBox "Yay !!"
End Sub

 

[hoshi]

Try using

Sub MM1()
Dim rng As Range
On Error Resume Next
Set rng = activesheet.usedrange.SpecialCells(xlCellTypeComments)
If rng Is Nothing Then: MsgBox "No comments Found": Else: MsgBox "Yay !!"
End Sub

No such luck.

According to the enumeration docs, that returns cells containing notes. Which i guess arnt comments?

That might be the source of my issues, that in vba land 'Comments' means notes. Does anyone know the reference for comments (as i have in my screenshot?)

 

[Michael M]

I think there may be a misunderstanding here.....Comments in Excel are small "Text Boxes" that appear when a mouse is hovered over a cell or the cell is selected.
The code @DanteAmor and I posted will count the "comments" , which for all intents and purposes are actually "notes inside text boxes"....which are classed as "Comments"
You may need to provide an Example of what you call "comments"

 

[Alex Blakenburg]

Wow doesn't that get confusing.
For what used to be called comments and are now called Excel Notes used for annotating the spreadsheet, either of these 2 will work:-

activesheet.cells.SpecialCells(xlCellTypeComments).count
activesheet.comments.count

For threaded comments (new comments with for collaboration).

activesheet.CommentsThreaded.Count

From Microsoft Documentation:-
The difference between threaded comments and notes

 

[Michael M]

Owww....:

:

 

[Alex Blakenburg]

LOL

 

[hoshi]

Owww....:View attachment 45012:

I know right?

Thank you all for your help.