Eingaben beschraenken
26.05.2006 10:48:48
Herbert
ich habe eine UserForm erstellt, die Eingaben entgegen nimmt. Diese werden dann in eine Excel-Tabelle übertragen. In einige Felder soll aber genau eine Ziffer geschrieben werden. Meine Lösung ist nicht so toll. Beim Versuch eine weitere einzutragen, erscheint eine Fehlermeldung. Kann man den Eintrag auch ohne eine Meldung blockieren? Weiterhin kann der Nutzer statt Zahlen auch Buchstaben eintragen. Wie verhindere ich dies?
Private Sub TextBox1_Change()
If Len(TextBox1.Text) < 1 Then
[l11] = TextBox1.Text
Else
MsgBox "Maximale Texlänge erreicht!"
End If
Bin über jeden Vorschlag dankbar. Gruß Herbert
End Sub
Anzeige