max.Länge in Textbox
01.08.2002 15:23:14
Karin
In einer Textbox möchte ich einen Text hineinschreiben mit einer maximalen Länge. Bis dahin kein Problem:
Private Sub CommandButton1_Click()
If Len(TextBox1.Value) > 50 Then
MsgBox "falsche Länge, nicht mehr als 50 Zeichen verwenden!)"
Else
Range("A1").Value = UserForm1.TextBox1.Value
End If
Unload Me
End Sub
Doch nun mein Problem: gibt es eine Möglichkeit, dass die Buchstaben gezählt werden, z.B. ein Zähler der mir anzeigt, wieviele Buchstaben ich schon eingetippt habe?
Vielen Dank für eure Hilfe
Gruss
Karin
Anzeige