Ich habe 2 Textboxen
Mit der 1. Textbox lese ich meine ActiveCell aus
Private Sub UserForm_Initialize()
TextBox1 = ActiveCell.Text
End Sub
_____________________Mit meiner 2. Textbox (und CommandButton) füge ich einen NEUEN Text ein.
Private Sub CommandButton2_Click()
If TextBox1.Value = "" Then
ActiveCell = TextBox2.Text
Else
ActiveCell = TextBox1.Text & Chr(10) & TextBox2.Text
End If
End Sub
______________________________Jetzt meine Frage:
Ist es möglich, den Text den ich NEU einfüge die Schriftfarbe zu ändern?
Bsp.:
Erster Text der ausgelesen wird ist Schwarz (soll auch so bleiben) und der nächste Text, den ich einfüge, der soll zum Bsp. Rot eingefügt werden
Ist dies irgendwie möglich?
Danke
Klaus