Hallo,
ich möchte ein Textfeld auf ein Datum überprüfen . Es klappt auch. Aber wenn ein kein Datum erkannt wurde möchte ich zurück zur UserForm1. Mein Fehler liegt bei END glaube ich .
Hier der Code:Sub Datumprüfen()
If IsDate(DatumEingabe.TBvon) = False Then
MsgBox ("Bitte Datum eingeben"), vbCritical
End
End If
If IsDate(DatumEingabe.TBbis) = False Then
MsgBox ("Bitte Datum eingeben"), vbCritical
End
End If
End Sub