KeyPress

Forumthread: KeyPress
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: KeyPress

KeyPress

14.10.2016 21:58:26

Barbara

Hallo
ich bin noch blutige Anfängerin in VBA.
Ich möchte in einem Textfeld mit KeyPress abfangen, dass nur Zahlen erlaubt sind,
und diese einen Wert(Eingabe) von 8499 und 49501 haben.
Wenn Buchstaben oder Sonderzeichen eingegeben werden, soll VBA so lange auf dem Textfeld bleiben, bis ein korrekter Wert eingegeben wird.
Das Textfeld verlasse ich immer mit der TAB-Tast
Tausend Dank für einen Tip!
Barbara

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: KeyPress

14.10.2016 22:05:19

Hajo_Zi
AW: KeyPress

14.10.2016 22:24:20

Barbara
AW: KeyPress

14.10.2016 22:29:49

Daniel

AW: KeyPress

14.10.2016 22:05:19

Hajo_Zi

Hallo Barbara,
mache eine Combobox ist einfacher.

AW: KeyPress

14.10.2016 22:24:20

Barbara

Ich glaube ich habe mich falsch ausgedrückt.
Alle Wert-Eingaben zwischen 8499 und 49501 sind möglich.
Also 8500,8501,8502 ..... 49498,49499,49500
Barbara

AW: KeyPress

14.10.2016 22:29:49

Daniel

Hi
im Keypress kannst du erstmal alle Buchstaben und Sonderzeichen unterdrücken:

Select Case KeyAscii
Case Asc("0") to Asc("9")
Case Else
KeyAscii = 0
End select

wie du jetzt verhinderst, dass du das Textfeld verlassen kannst, hängt davon ob das Textfeld in einer Userform oder direkt auf dem Tabellenblatt liegt.
bei einem Textfeld direkt im Tabellenblatt würde ich aber eher auf das Textfeld verzichten und eine Zelle nehmen, dort kannst du über die Datenüberprüfung festlegen, dass nur Zahlen in einem bestimmten Wertebereich eingegeben werden dürfen (Datenüberprüfung - Einstellungen - Zulassen: Ganze Zahl - Zwischen), ohne dass du was programmieren musst.
Gruß Daniel

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!