FWIW, another option is to create a new comment with a utility macro. An
example that changes the font name and size:

Sub NewComment()
On Error Resume Next
With ActiveCell.AddComment.Shape
.TextFrame.Characters.Font.Name = "Terminal"
.TextFrame.Characters.Font.Size = 9
.ScaleWidth 1.5, msoFalse
.ScaleHeight 1.5, msoFalse
.Visible = msoTrue
.Select
End With
End Sub


--
Jim
wrote in message
news:mnx2f.233415$084.32115@attbi_s22...
| rather than manipulating every comment I put in?