Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

MsgBox erscheinen lassen, wenn nicht Zahl

MsgBox erscheinen lassen, wenn nicht Zahl
28.01.2020 20:31:24
Wolfgang
Hallo,
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

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MsgBox erscheinen lassen, wenn nicht Zahl
28.01.2020 20:41:23
Hajo_Zi
KeyAscii = 0
msgbox "FALSCH"

Danke, Hajo - klappt super!
29.01.2020 05:15:43
Wolfgang
Hallo Hajo,
vielen Dank für Deine schnelle Antwort und den Hinweis. Die Meldung erscheint nun wunderbar - auch hierfür meinen Dank. Gruß - Wolfgang
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige