ich nutze oft die "Kommentar" Funktion und möchte die Schriftart + Schriftgröße für alle Kommentare fest voreinstellen. Wo kann ich diese Einstellung vornehmen?
Grüße von
UWE
Sub Kommentare()
Dim cmt As Comment
For Each cmt In ActiveSheet.Comments
With cmt.Shape.TextFrame.Characters.Font
.Name = "Arial"
.Size = "20"
End With
Next cmt
End Sub
Dieses Makro stellt Dir alle Kommentare auf ARIAL Größe 20.
Willst Du etwas anderes, musst Du dies im Makro ändern...
Dies ist zwar eine nachträgliche Änderung, aber vielleicht hilfts Dir.
Gruß,
Ptonka