Forum Discussion
Default properties for comments and notes
Is there a way to set default properties (format) for comments and notes such as font, font size, automatic sizing of note, etc. so I don't have to change these each time I add a note or comment.
David Lambert Not by default. But you could use this simple macro:
Sub AddOrFormatComment()
If ActiveCell.Comment Is Nothing Then
ActiveCell.AddComment ""
End If
With ActiveCell.Comment.Shape.TextFrame.Characters(1, ActiveCell.Comment.Shape.TextFrame.Characters.Count).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub
- And of course modify the code with the font name ans size you want...
that was helpful! can you add to that macro to then edit note so I don't have to do that extra step to start typing?JKPieterse
