VBA Parent of comment

[antaeusguy]

I've written a code to change the text of all comments in a workbook to "Comment is deleted."

I got part of this code off the web and modified myself.

I am trying to understand this code: cm.Parent.AddComment

What is the parent of the object comment? Isn't it Comments? How come in this case, the parent seems to be range (as the AddComment is a member of range).

Anyone who could enlighten me on this subject would be much appreciated

Sub DelComments()
    Dim cm As Comment
    Dim ws As Worksheet
    
    For Each ws In Worksheets
        ws.Activate
        For Each cm In ActiveSheet.Comments
            cm.Delete
            cm.Parent.AddComment Text:="Comment is deleted."
        Next cm
    Next ws
End Sub

 

[MrKowz]

What is the parent of the object comment? Isn't it Comments? How come in this case, the parent seems to be range (as the AddComment is a member of range).

Anyone who could enlighten me on this subject would be much appreciated

The parent of a comment is the Range object. Think of how you would have to write a comment in VBA, you can't just say

AddComment Text:="Foo"

It isn't being told where to look!

So in order to use AddComment, we have to tell it where to look, thus giving it a "Parent" object.

Range("A1").AddComment Text:="Foo"

To go further, the Worksheet object is the parent of the Range object, and the Workbook object is the parent of the Worksheet object.