Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Einträge in Textbox/UserForm begrenzen

Einträge in Textbox/UserForm begrenzen
15.05.2005 18:15:03
Max
Hallo,
da die Ziel-Zelle nur begrenzt Zeichen aufnehmen kann, möchte ich die
Anzahl der Zeichen in einer Userform-Textbox gerne begrenzen.
Falls das geht: wie muß der Code der Beispielsdatei von der Herber-CD
geändert werden?
https://www.herber.de/bbs/user/22735.xls
Danke für die Mühe!
Gruß
Max
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Einträge in Textbox/UserForm begrenzen
15.05.2005 19:47:25
NE
Hallo Max,
ohne mir das File angeschaut zu haben;-)
Mit der Textbox-Eigenschaft MaxLength kannst Du die maximale Anzahl der einzugebenden Zeichen begrenzen.
Gruss Nancy
AW: Einträge in Textbox (erledigt)
15.05.2005 20:07:55
Max
Hallo Nancy,
ich habe dann mal hingeschaut........;-))
Danke für die Lösung meines Problems!
Das kommt davon, wenn man hinter jeder Kleinigkeit direkt eine Formel oder einen
Code vermutet.
Noch ein schönes Wochenende!
Gruß
Max
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Einträge in Textbox/UserForm begrenzen


Schritt-für-Schritt-Anleitung

Um die Anzahl der Zeichen in einer Textbox innerhalb einer UserForm in Excel zu begrenzen, kannst Du die MaxLength-Eigenschaft der Textbox verwenden. Hier sind die Schritte, die Du befolgen musst:

  1. Öffne die Excel-Datei, die Deine UserForm enthält.

  2. Klicke mit der rechten Maustaste auf die UserForm und wähle "Code anzeigen".

  3. Wähle die Textbox aus, für die Du die Zeichenbegrenzung festlegen möchtest.

  4. Füge folgenden Code in das Code-Fenster der UserForm ein:

    Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
       If Len(TextBox1.Text) >= 10 Then ' Hier die maximale Zeichenanzahl festlegen
           KeyAscii = 0 ' Verhindert die Eingabe weiterer Zeichen
       End If
    End Sub
  5. Stelle sicher, dass Du die Zahl "10" durch die gewünschte maximale Anzahl der Zeichen ersetzt.

  6. Schließe den Code-Editor und teste die UserForm.


Häufige Fehler und Lösungen

  • Problem: Die Textbox akzeptiert mehr Zeichen als festgelegt.

    • Lösung: Überprüfe, ob die MaxLength-Eigenschaft korrekt gesetzt ist. In den Eigenschaften der Textbox kannst Du die maximale Länge direkt angeben.
  • Problem: Der Code wird nicht ausgeführt.

    • Lösung: Stelle sicher, dass Du den Code im richtigen Ereignis (z.B. KeyPress) eingetragen hast.

Alternative Methoden

Neben der Verwendung der MaxLength-Eigenschaft kannst Du auch die folgende Methode verwenden, um die Eingabe zu kontrollieren:

  • Eingabeüberprüfung über das Worksheet: Du kannst auch ein Arbeitsblatt verwenden, um die Eingabe per VBA zu validieren, bevor die Daten gespeichert werden. Beispielsweise kannst Du die Eingabe direkt beim Verlassen der Textbox überprüfen.

    Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
       If Len(TextBox1.Text) > 10 Then
           MsgBox "Die maximale Anzahl der Zeichen beträgt 10."
           Cancel = True ' Lässt den Fokus in der Textbox
       End If
    End Sub

Praktische Beispiele

Hier ist ein einfaches Beispiel zur Implementierung der Zeichenbegrenzung in einer UserForm:

  1. Erstelle eine UserForm mit einer Textbox und einem Button.
  2. Füge den oben genannten Code in die UserForm ein.
  3. Teste die UserForm, um sicherzustellen, dass die Zeichenbegrenzung funktioniert.

Tipps für Profis

  • Verwende die MaxLength-Eigenschaft: Wenn Du nur eine einfache Begrenzung möchtest, ist dies die einfachste Methode.
  • Kombiniere Eingabeverifizierung: Du kannst die Eingabeüberprüfung mit einer Fehlerbehandlung kombinieren, um sicherzustellen, dass die Benutzerfreundlichkeit der UserForm verbessert wird.
  • Dokumentiere Deinen Code: Halte fest, warum Du bestimmte Grenzwerte festgelegt hast, um zukünftigen Änderungen und Wartungen zu erleichtern.

FAQ: Häufige Fragen

1. Wie kann ich die Zeichenanzahl dynamisch ändern? Du kannst die Zeichenanzahl durch eine Variable ersetzen, die Du zur Laufzeit ändern kannst, um mehr Flexibilität zu haben.

2. Was passiert, wenn ich die Eigenschaften der Textbox nicht richtig einstelle? Wenn die Eigenschaften nicht richtig eingestellt sind, kann es sein, dass die Textbox mehr Zeichen akzeptiert, als Du beabsichtigt hast, was zu Dateninkonsistenzen führen kann.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige