|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 UserForm Textboxen dürfen nur Zahlen enthalten |
15.10.2018 13:23:50 |
Moritz |
|
|
|
15.10.2018 19:05:52 |
Gast14870 |
|
|
|
18.10.2018 08:55:03 |
Gast2643 |
|
|
Von:
Moritz |
Datum:
15.10.2018 13:23:50 |
Views:
1256 |
Rating:
|
Antwort:
|
Thema:
UserForm Textboxen dürfen nur Zahlen enthalten |
|
Hallo zusammen,
bin absoluter Einsteiger in VBA und stehe grade etwas auf dem Schlauch. Habe eine UserForm, in der man 31 TextBoxen ("txt_1" bis "txt_31") hat. Eine davon ist der Name des Datensatzes ("txt_31", Text und Zahlen erlaubt), die anderen 30 sollen nur ganzzahlige Zahlenwerte enthalten.
Habe mich ein wenig durch Foren gewühlt und wollte nicht gleich in die Klassenprogrammierung einsteigen und auch nicht für jede TextBox ein eigenen Sub mit KeyAscii erstellen.
Hier der Code:
Dim j As Long
Dim EingabeZahl As Boolean
For j = 1 To 30
If IsNumeric(Controls("txt_" & j)) Then EingabeZahl = True: Exit For
Next
If EingabeZahl = False Then MsgBox "Bitte nur Zahlen eingeben"
Dieser zeigt mir aber auch bei korrekt ausgefüllten Feldern die MsgBox.
Dieser Code hier, den ich quasi als Workaround geschrieben habe funktioniert:
Dim j As Long
For j = 1 To 30
If Not IsNumeric(Controls("txt_" & j)) Then Controls("txt_" & j).Value = "": Exit For
Next
Kann mir da jemand helfen? Wie bekomme ich das erste zum Laufen? Vielen Dank schon mal.
Grüße
Moritz
PS: Nach dem Code wird noch gecheckt ob Felder leer sind, deshalb bricht der zweite Code ab (die TextBox die keine Zahl enthält wird geleert und wirft deshalb, wie erwünscht, eine MsgBox aus). Danach werden die Werte in einer Tabelle gespeichert. |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
UserForm Textboxen dürfen nur Zahlen enthalten |
15.10.2018 13:23:50 |
Moritz |
|
|
|
15.10.2018 19:05:52 |
Gast14870 |
|
|
|
18.10.2018 08:55:03 |
Gast2643 |
|
|