my comments won't change font!

A

Albert

Hi!
I'm trying to change the font on my comments, but it doesn't work.
I'm doing the following:
1. Right click on cell with comment
2. Modify comment
3. Select whole comment
4. Select different font
and..... nothing happens!
Could you give me a hand?
Thanx in advance,
Albert
 
G

Gary''s Student

Hi Albert:

There is a tiny trick!

After you have select all the text in the comment (step #3)
Right-click and pick Format comment...
Pick your font from the resulting dialog
 
A

Albert

Hi Gary's Student:
Thanx for your suggestion.
However, it only seems to work sporadicaly.
For example, it works when I pick the font "Terminal", but it doesn't when I
pick "Courier New" (it shows the default Tahoma).
What to do?
Thanx again,
Albert
 
D

Dana DeLouis

Here's a macro that changes all the Comments on the sheet.
Adjust as necessary.

Sub Comments_AutoSize()
Dim MyComments As Comment
For Each MyComments In ActiveSheet.Comments
With MyComments.Shape.TextFrame
.Characters.Font.Name = "Courier New"
.Characters.Font.Size = 10
.AutoSize = True
End With
Next
End Sub
 
Top