Textbox eingabe pruefung
24.11.2008 22:48:23
hary
Kurz vor feierabend kommt der Blackout.
Hiermit ueberpruefe ich die Zahleneingabe. Nach druecken der Entertaste geht der Focus trotzdem in TextBoxb(wegen Aktivierreihenfolge).Wenn kein Eintrag: Wie bleib der Focus trotzdem in Textboxa?
Private Sub Textboxa_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 48 To 57
Case Else: KeyAscii = 0
MsgBox ("Nur Zahlen zugelassen")
End Select
End Sub
Gruss Hary
Anzeige