Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
900to904
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
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Textbox soll nur Zahlen akzeptieren
04.09.2007 15:52:32
a_ke
Hallo,
ich habe schon im Forum gestöbert, aber noch keine zufriedenstellende Lösung gefunden.
Auf einer Userform Multipage befinden sich 30 Textboxes, welche nur mit Zahlen gefüllt werden dürfen,
da diese anschließend in der Tabelle weiterberechnet und an die Userform zurückgegeben werden.
Wie kann ich am einfachsten die Eingabe anderer Werte blockieren und nur Zahlen zulassen?
Es soll keine Msgbox angezeigt oder andere Aktion ausgeführt werden.
Wenn ich z.B Buchstaben oder andere Zeichen eingebe, so sollen diese einfach nicht angenommen werden. Ist dies mit einer einfachen Lösung machbar ?
Andre

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

Betreff
Datum
Anwender
Anzeige
AW: Textbox soll nur Zahlen akzeptieren
04.09.2007 16:02:00
Peter
Hallo Andre,
für EINE TextBox so:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 44, 48 To 57   ' 44 = Komma, 48 - 57 = 1 bis 0
Case Else
KeyAscii = 0
End Select
End Sub


Bei 30 TextBoxes, besser mit Klassenmodul - oder obigen Code 30 mal wiederholen.
Gruß Peter

mit ... IsNumeric
04.09.2007 16:02:00
Matthias
Hallo
Beispiel Textbox1

Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1) Then TextBox1.Value = ""
End Sub


Userbild

Anzeige
Danke ! Problem gelöst
04.09.2007 16:38:50
a_ke
Hallo Peter und Matthias,
dank Eurer Hilfe kann ich jetzt weiterarbeiten.
Es funktioniert beides.
Andre

204 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige