Excel VBA, Indsætte commentar i celle med blandet formatering.

Hej eldaria
hvis du skal have indsat kommentaren via en userform, så kan nedenstående måske inspirere dig. hvis ikke du vil bruge en userform, så må du forklare dig lidt nærmere.

Private Sub CommandButton1_Click()
Sheets("Ark1").Activate
Dim var1
var1 = UserForm1.TextBox1.Text

ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Text Text:=var1

End Sub

Jeg fik ikke brug for det aligevel, men smid et svar så du kan få points... :-)

svar :-)