Comments object

A collection of cell comments.

Remarks

Each comment is represented by a Comment object.

Example

Use the Comments property of the Worksheet object to return the Comments collection. The following example hides all the comments on worksheet one.

Set cmt = Worksheets(1).Comments
For Each c In cmt
    c.Visible = False
Next

Use the AddComment method of the Range object to add a comment to a range. The following example adds a comment to cell E5 on worksheet one.

With Worksheets(1).Range("e5").AddComment
    .Visible = False
    .Text "reviewed on " & Date
End With

Use Comments (index), where index is the comment number, to return a single comment from the Comments collection. The following example hides comment two on worksheet one.

Worksheets(1).Comments(2).Visible = False