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?
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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen