Editing comment text

[AlexanderBB]

Set rng = rng.SpecialCells(xlCellTypeComments)
For Each cl In rng
cl.comment.text = Replace(cl.comment.text, Chr$(45), Chr$(150))
next

I'm getting error Object doesn't support this property or method
Is it possible to edit Comment text (keeping any formatting) or must the whole
comment be removed and replaced?

 

[footoo]

Try removing the = sign.

 

[AlexanderBB]

Thanks. Yes, that worked but it changes all text formatting to whatever the first line is.
So I guess any formatting must be reapplied.