Sub FormatAllComments()
'www.contextures.com\xlcomments03.html
Dim ws As Worksheet
Dim cmt As Comment
For Each ws In ActiveWorkbook.Worksheets
For Each cmt In ws.Comments
With cmt.Shape.TextFrame.Characters.Font
.Name = "Times New Roman"
.Size = 12
End With
Next cmt
Next ws
End Sub



Gord



On Wed, 29 Feb 2012 06:57:21 +0000, y.ranjbaran
wrote:


plz help

I have to increase all comments font size, in excel 2007 in win 7.
1000 comment!
how can i increase all comments font-size. without making change one by
one??

tnxx