How can I format the size of the comment box to make all of them easier to
read?



"Gord Dibben" wrote:

Code from Debra Dalgleish to re-format all Comments on all sheets in a workbook

Sub FormatAllComments()
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 Dibben MS Excel MVP


On Tue, 31 Jul 2007 10:40:06 -0700, AJB wrote:

I have a large worksheet with approx. 5,000 comments. Can I change the
default size, font, etc to make all of them easier to read in one fell swoop?
Thanks much.