Kommentar formatieren

06/03/2009 - 09:49 von bernward | Report spam
Hallo,

Ich möchte einen Kommentar über VBA aktualsieren.
Range("...").Comment.Text Text:="Überschrift:" & vbLf & ".."
Dabei soll die Überschrift fett erscheinen und der restliche Text
normal.
Per Hand làßt sich der Kommentar formatieren. Wie kann ich die
Formatierung aber schon im Code machen?

Bernward
 

Lesen sie die antworten

#1 Andreas Killer
06/03/2009 - 15:40 | Warnen spam
bernward schrieb:

Ich möchte einen Kommentar über VBA aktualsieren.
Range("...").Comment.Text Text:="Überschrift:" & vbLf & ".."
Dabei soll die Überschrift fett erscheinen und der restliche Text
normal.


Sub Test()
MyAddComment Range("A1"), "Hello World"
End Sub

Sub MyAddComment(ToCell As Range, Text As String)
Dim objComment As Comment
Dim strHeader As String
With ToCell
strHeader = Application.UserName & ":" & vbLf
Set objComment = .AddComment(strHeader & Text)
With objComment.Shape.TextFrame
.Characters.Font.Bold = False
.Characters(1, Len(strHeader)).Font.Bold = True
End With
End With
End Sub

Ähnliche fragen