Ich habe eine Textbox (Multiline)
Die protokolliert mir die Ergebnisse verschiedener Makros.
Nun möchte ich aber das der Cursor immer automatisch an die letzte Zeile gesetzt wird.
Um immer gleich die aktuellste Textausgabe mitlesen zu können.
Aber wie erreiche ich das:
Hier das Makro da mir den Text Zusammenstellt.
--------------------------------------------------
Public Sub changeAndConcateTextAndRepaint(displayText As String)
Ueberschrif1.Caption = "Fortschritt Tabelle " & ActiveSheet.Name & " " & Time
TextBoxForschritt.Text = TextBoxForschritt.Text & vbCr & displayText
TextBoxForschritt.SelStart = TextBoxForschritt.TextLength
Repaint
TextBoxForschritt.SelStart = TextBoxForschritt.TextLength
End Sub
------------------------------------------------------
Der Cursor bleibt irgendwie immer in mittendrin stehen und ich muss scrollen.
Wer kann hier helfen
Gruß Horst