Textbox nur zahlen oder Buchstaben

Forumthread: Textbox nur zahlen oder Buchstaben

27.12.2019 15:21:18

feuerharry

Hy Ihr Spezilisten
Wer kann mir diesen Code umbauen?
Userform -Textbox2 sollen nur Ziffern hinein geschrieben werden.
Möchte gerne bei Anschlag eines Buchstaben, das sofort eine msgbox erscheint
"nur Zahlen eingeben"
---------------------------------------------------------------------------------------------------------------------
' nur ZIFFERN Textbox 2 = PLZ


Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Chr(KeyAscii) Like "[0-9]" = False Then KeyAscii = 0
End Sub

-------------------------------------------------------------------------------------------------------------------
Userform-Textbox3 sollen nur Buchstaben hinein geschrieben werden.
Möchte gerne bei Anschlag einer Ziffer, das sofort eine msgbox erscheint
"nur Buchstaben eingeben"
------------------------------------------------------------------------------------------------------------------
' nur BUCHSTABEN, Punkt und Bindestrich Textbox 3 = Ort


Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Chr(KeyAscii) Like "[a-z A-Z Ä ä Ö ö Ü ü . - ß]" = False Then KeyAscii = 0
End Sub

---------------------------------------------------------------------------------------------------
LG feuerharry

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Textbox nur zahlen oder Buchstaben

27.12.2019 15:38:54

Nepumuk
AW: Textbox nur zahlen oder Buchstaben

27.12.2019 15:45:40

feuerharry

AW: Textbox nur zahlen oder Buchstaben

27.12.2019 15:38:54

Nepumuk

Hallo feuerharry,
teste mal:

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

    If Chr$(KeyAscii) Like "[!0-9]" Then
        MsgBox "Nur Zahlen"
        KeyAscii = 0
    End If
End Sub

Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

    If Chr$(KeyAscii) Like "[!a-z A-Z Ä ä Ö ö Ü ü . - ß]" Then
        MsgBox "Nur Buchstaben"
        KeyAscii = 0
    End If
End Sub

Gruß
Nepumuk

AW: Textbox nur zahlen oder Buchstaben

27.12.2019 15:45:40

feuerharry

Danke Nepumuk
Passt ganz genau.
Habe schon einige Codes von dir genommen. Da ich mich nicht so gut auskenne hilft es mir immer weiter.
Danke Prosit 2020
VLG feuerharry

Infobox / Tutorial

Textbox nur Zahlen oder Buchstaben in Excel

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um eine Textbox in Excel VBA so einzurichten, dass sie nur Zahlen oder Buchstaben akzeptiert, kannst du die folgenden Schritte befolgen:

Öffne den VBA-Editor: Drücke ALT + F11 in Excel.
Füge ein UserForm hinzu: Klicke auf Einfügen > UserForm.
Füge Textboxen hinzu: Ziehe zwei Textboxen (z.B. TextBox2 für Zahlen und TextBox3 für Buchstaben) auf das UserForm.

Füge den folgenden Code hinzu:

Für die TextBox, die nur Zahlen akzeptieren soll:

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   If Chr(KeyAscii) Like "[0-9]" = False Then
       MsgBox "Bitte nur Zahlen eingeben"
       KeyAscii = 0
   End If
End Sub

Für die TextBox, die nur Buchstaben akzeptieren soll:

Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   If Chr(KeyAscii) Like "[a-z A-Z Ä ä Ö ö Ü ü . - ß]" = False Then
       MsgBox "Bitte nur Buchstaben eingeben"
       KeyAscii = 0
   End If
End Sub

Teste das UserForm: Führe das UserForm aus und teste die Textboxen.

Häufige Fehler und Lösungen

Fehler: Textbox akzeptiert trotzdem Buchstaben oder Zahlen.
- Lösung: Stelle sicher, dass der Code korrekt in die jeweiligen TextBox-Events eingefügt wurde.
Fehler: MsgBox erscheint nicht.
- Lösung: Überprüfe, ob der KeyAscii-Wert korrekt ausgewertet wird und ob die TextBox das richtige Event verwendet.

Alternative Methoden

Eine alternative Methode wäre die Verwendung von Datenvalidierungen in Excel, anstatt VBA zu nutzen. Damit könntest du beispielsweise für eine Zelle festlegen, dass nur Zahlen eingegeben werden dürfen, allerdings nicht in einer Textbox.

Praktische Beispiele

Beispiel für eine PLZ-Eingabe: Du könntest eine Textbox für die Eingabe einer Postleitzahl erstellen, die nur Ziffern akzeptiert.
Beispiel für Ortsnamen: Eine Textbox, in der der Nutzer einen bestimmten Ort (z.B. "ein unbekannter Ort 6 Buchstaben") eingeben kann, wobei nur Buchstaben erlaubt sind.

Tipps für Profis

Erweiterte Validierung: Du kannst den Code erweitern, um spezifische Längen der Eingaben zu überprüfen. Zum Beispiel für eine PLZ mit 5 Ziffern oder einen Ortsnamen mit 6 Buchstaben.
Benutzerfreundlichkeit: Überlege, wie du die Benutzerführung verbessern kannst, indem du Platzhalter in den Textboxen verwendest.

FAQ: Häufige Fragen

1. Kann ich die Textboxen auch für andere Eingabetypen anpassen?
Ja, du kannst den Code ähnlich anpassen, um beispielsweise spezielle Zeichen zu erlauben oder weitere Eingabetypen zu definieren.

2. Was ist, wenn ich mehrere Textboxen habe?
Du kannst für jede Textbox einen eigenen Code schreiben oder eine allgemeine Funktion erstellen, die du dann für alle Textboxen wiederverwendest.

Beliebteste Forumthreads (12 Monate)

Textbox nur zahlen oder Buchstaben

Forumthread: Textbox nur zahlen oder Buchstaben

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

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Textbox nur Zahlen oder Buchstaben in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread