Edit Comment Box

E

Eager2Learn

Hello!

If I have a cell with a comment in it, what code would I use to ad
more comments to the current comments? The comments I will be adde
will be hard coded, nothing that the user would enter.

I am using the .offset command for the appropriate cell.

Thank you very much in advance,
E2
 
P

pfsardella

One way :

Sub ModifyComment()
Dim strS
strS = ActiveCell.Comment.Text
ActiveCell.ClearComments
ActiveCell.AddComment Text:=strS & "Your addition to comment."
End Sub

HTH
Paul
 
Top