Text Method Example

This example adds a comment to cell E5 on sheet one.

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