Letztes Zeichen in einer Textbox löschen

[Thomas Metz]

Hallo*
ich möchte gerne das letzte Zeichen in einer Textbox löschen um mit dem Rest
weiterarbeiten zu können.
Eingabe sieht z.B. so aus 123M . Das M muss gelöscht werden. In der
Textbox ist der Buchstabe immer am Ende, es können aber auch andere
Buchstaben vorkommen.
Sieht eigentlich einfach aus, aber ich suche mir einen Wolf.
Ich hoffe, dass es jetzt da Draußen jemanden geben wird, der lacht und mir
die Lösung sagt. Deshalb VIELEN DANK im Voraus.

Mit freundlichen Grüßen

Thomas

[NoNet]

Hallo Thomas,

kopiere dazu folgenden Code in das Klassenmodul des Userforms :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'Deletes last character of a textbox when textbox lost focus
If Len(TextBox1.Value) > 0 Then TextBox1.Value = Left(TextBox1,
Len(TextBox1.Value) - 1)
End Sub

Gruß, NoNet

[Thomas Metz]

Hallo NoNet,

du hast mein sinnloses und zeitraubendes suchen und ausprobieren mit deiner
Antwort beendet. Funktioniert 100%. Vielen Dank . Hast was Gut bei mir.
Gruß Thomas

Post by NoNet
Hallo Thomas,
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'Deletes last character of a textbox when textbox lost focus
If Len(TextBox1.Value) > 0 Then TextBox1.Value = Left(TextBox1,
Len(TextBox1.Value) - 1)
End Sub
Gruß, NoNet