TextBoxen prüfen
23.09.2015 12:57:40
Juli
ich habe 30 Textboxen, in 20 von denen muss ein Datum eingetragen werden.
Ich möchte eine Schleife (oder was sonst noch möglich wäre), die mir diese 20 TextBoxen prüft ob da ein Datum eingegeben wurde.
Am Besten gleich beim Verlassen der TextBox:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
With TextBox1
If Not IsDate(.Text) Or _
InStr(.Text, ":") Or _
.TextLength 10 Then
TextBox_PreCon.Value = ""
MsgBox "Kein gültiges Datumsformat! Bitte Datum dd.mm.jjjj eingeben!", vbCritical, "Falsche _
Eingabe"
Cancel = True
End If
End With
End Sub
Wie setzte ich das dann um? Kann mir da jmd helfen?
Danke schonmal :)
VG Julia
Anzeige