Eingabe von Zahlen in Textbox erzwingen
30.05.2006 22:52:57
Zahlen
ich habe folgenden Code gefunden, mit dem ich sicherstelle, dass in einer Textbox nur Zahlen eingegeben werden können:
Private Sub tbox10_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Chr(KeyAscii) Like "[0-9]" = False Then
KeyAscii = 0
End If
End Sub
Ich habe auf der Userform weitere Textboxen. Muss ich für jede dieser Textboxen eine solche sub angeben, oder läßt sich das auch zusammenfassen?
Gruß Emil