View Single Post
  #1   Report Post  
Dave Peterson
 
Posts: n/a
Default

Debra Dalgleish has lots of sample code for working with comments at:
http://www.contextures.com/xlcomments03.html

I stole one version and modified it to this:

Option Explicit
Sub ChangeCommentFont()
Dim cmt As Comment
For Each cmt In ActiveSheet.Comments
With cmt.Shape.TextFrame.Characters.Font
.Name = "Times New Roman"
.Size = 11
.Bold = False
.ColorIndex = 0
End With
Next cmt
End Sub


She also has an example for adding comments using the font you want via a macro:
http://www.contextures.com/xlcomments03.html#Formatted

(That's the one I started with, too.)


armenthj wrote:

How do I complete a global change the font settings in comment boxes rather
than having to change the font in each comment box individually?


--

Dave Peterson