Text im Kommentar
13.01.2003 22:23:35
Peter
Sub KommentarFestlegen()
With ActiveCell
.AddComment
.Comment.Visible = True
.Comment.Text Text:=Range("BN1").Text
End With
ActiveCell.Comment.Visible = False
End Sub
diesen Makro habe ich mir in der Recherche zusammen "geschustert".
Was ich nicht gefunden habe den Text in einem Kommentar auch noch horizontal und vertikal zu zentrieren und die Schriftgröße auf 10 oder 12 zu vergrößern ?!?!
Gruß Peter
Anzeige