Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

textbox mit leezeichen auffüllen

Forumthread: textbox mit leezeichen auffüllen

textbox mit leezeichen auffüllen
15.01.2004 08:40:54
Michael
HAllo Excelgemeinde,
ich habe eine textbox in einer userform die genau 11-stellig sein soll. wenn beim verlassen weniger Stellen vorhnaden sind soll mit Leerzeichen aufgefüllt werden. Dem noch nicht genug. Ich würde die Eingabe gerne auf Buchstaben,Zahlen und die Zeichen "-" und "_" begrenzen. Ich bin da leider überfordert.
Danke für eure Hilfe
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: textbox mit leezeichen auffüllen
15.01.2004 09:05:48
Gerd
Bei den Buchstaben auch Umlaute und ß ?
Gerd
AW: textbox mit leezeichen auffüllen
15.01.2004 09:07:07
Michael
Keine Umlaute und auch kein ß
Gruß Michael
AW: textbox mit leezeichen auffüllen
15.01.2004 10:55:18
K.Rola
Hallo,
Option Explicit

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim d As Byte, l As Byte, ml As Byte
l = Len(TextBox1)
ml = TextBox1.MaxLength
If l < ml Then
For d = l To ml - 1
TextBox1 = TextBox1 & Chr(32)
Next
End If
End Sub



Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 45, 95
Case 48 To 57
Case 65 To 90
Case 97 To 122
Case Else: KeyAscii = 0
End Select
End Sub



Private Sub UserForm_Initialize()
TextBox1.MaxLength = 11
End Sub

Gruß K.Rola
Anzeige
AW: textbox mit leezeichen auffüllen
15.01.2004 11:03:33
Michael
Hallo K.Rola,
Funktioniert einwandfrei. Vielen Dank für deine Bemühungen. Da wäre ich dran verzweifelt.
Gruß Michael
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige