MsgBox erscheinen lassen, wenn nicht Zahl
28.01.2020 20:31:24
Wolfgang
den nachfolgenden Code konnte ich hier im Forum entdecken. Er verhindert, wenn ich ihn richtig verstehe, dass in Textbox1 Buchstaben eingetragen werden, da nur Zahlen erlaubt sein sollen. An welcher Stelle könnte eine MsgBox eingebaut werden, dass nur die Eingabe von Zahlen erlaubt ist, wenn doch Buchstaben o.ä. eingegeben werden?. Wie könnte der Code dann erweitert werden, dass die Zahl beim Abspeichern in die Tabelle direkt zur Zahl umgewandelt ist und in der jeweiligen Zelle als Zahl formatiert ist. Vielen Dank schon jetzt für die Rückmeldungen. Herzliche Grüße - Wolfgang
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
' Verhindern die Eingabe von Buchstaben
Select Case KeyAscii
' 0 - 9
Case 48 To 57
Case Else
KeyAscii = 0
End Select
End Sub
Anzeige