View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default changing comment defaults

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.