Prüfen einer Datums Eingabe in eine Textbox
07.11.2003 17:30:35
Wolfgang Friese
Ich bin wahrscheinlich unverschämt, aber ich hätte es gern in folgenden funktionierenden Code (von Eberhard bei Herber) eingebaut.
Private Sub txteingang_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsDate(txtEingang.Text) Then
MsgBox "Nur Datum bitte!"
txtEingang.Text = ""
Cancel = True
Exit Sub
End If
End Sub
Vielen Dank für Eure Hilfe!!
Gruß Wolfgang