Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
880to884
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
880to884
880to884
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Textbox, nur bestimmte Formierung zulassen
21.06.2007 21:56:00
Karsten
Hallo
Ich habe in einer Userform eine Textbox, in die eine Auftragsnummer
eingegeben werden soll.
Diese Auftragsnummern sehen folgender Maßen aus:
12345678-01
Sie können also bis zu 8 Stellen vor dem Minuszeichen haben und bis zu 2
nach dem Minuszeichen.
Wie kann ich das überprüfen lassen, ob die Eingabeform gewahrt wurde?
Denn manche geben die Zahl einfach mit einer Leertase dazwischen ein.
Es soll aber einheitlich sein.
Wie mache ich das am besten?
MfG
Karsten

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox, nur bestimmte Formierung zulassen
21.06.2007 22:09:16
Josef
Hallo Karsten,
probier mal.
' **********************************************************************
' Modul: UserForm1 Typ: Userform
' **********************************************************************

Option Explicit

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
    Case 48 To 57
        If Len(TextBox1.Text) = 8 Then KeyAscii = 45
    Case 45
        If Len(TextBox1.Text) <> 8 Then KeyAscii = 0
    Case Else
        KeyAscii = 0
End Select
End Sub

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

Gruß Sepp

Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige