Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
232to236
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
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

TextBox Eingaben prüfen

TextBox Eingaben prüfen
18.03.2003 10:03:32
Bernhard
Hallo,
gibt es eine Möglichkeit, TextBox-Eingaben in einer UserForm nach dem Verlassen der TextBox gleich auf Richtigkeit zu überprüfen?
Kongreter Fall:
Ich habe mehrere Eingabe-Felder, wo nur Zahlen erlaubt sind. Die Abfrage auf Richtigkeit erfolgt jetzt nach betätigen des OK-Buttons. Da ich aber eine Vielzahl von Eingabe-Feldern habe, soll die Richtigkeit der Eingabe gleich geprüft werden.

Danke für eure Hilfe,
Bernhard

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: TextBox Eingaben prüfen
18.03.2003 10:08:46
Ron Andres

Hi,

Du müstest die Prüfung beim verlasen der Box durchführen, mit

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Hier müsste die Prüfung stehen.

End Sub

Gruß Ron Andres

Re: TextBox Eingaben prüfen
18.03.2003 10:11:04
Nike

Hi,
du könntest schon die Veränderung abfangen...
Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1.Text) Then
TextBox1.Text = ""
End If
End Sub

Feiner wäre natürlich noch eine buchstabenweise
reduktion des Eintrags, bis alles numerisch ist,
aber das lass ich Dir zum tüfteln ;-)

Bye

Nike

Re: TextBox Eingaben prüfen
18.03.2003 10:36:07
L.Vira

Am besten, gleich nur Zahlen bei der Eingabe zulassen. GGf.
noch erweitern um Komma und Minuszeichen:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 48 To 57
Case Else: KeyAscii = 0
End Select
End Sub


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige