Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
756to760
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
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Gültigkeit für Steuerelement festlegen?
26.04.2006 11:17:51
im2nuts
hallo,
kann mir jemand helfen?
wie kann ich (oder kann ich überhaupt) für ein UserForm-Steuerelement (TextBox)
eine Gültigkeit festlegen? z.B. dass da nur ein Datum eingegben werden kann?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gültigkeit für Steuerelement festlegen?
26.04.2006 11:57:27
P@ulchen
Hallo,
In das Modul der Userform folgenden Code (TextBox1 ist Eingabefeld):


Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
   If Len(TextBox1.Text) < 10 Then Cancel = True
End Sub
Private Sub TextBox1_Change()
   If Len(TextBox1.Text) = 10 Then
      If IsDate(TextBox1.Text) = False Then
         MsgBox "Keine gültige Eingabe!"
      End If
   End If
End Sub
Private Sub TextBox1_KeyPress( _
   ByVal KeyAscii As MSForms.ReturnInteger)
   If Chr(KeyAscii) Like "[0-9.]" = False Then
      KeyAscii = 0
   End If
End Sub


Gruß aus Leipzig
P@ulchen
www.excel-werkstatt.de

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige