Datum prüfen und UF stoppen
02.12.2015 12:17:54
ludicla
ich hab mal wieder ein Brett vorm Hirn.
mit folgenden Code prüfe ich eine Combobox auf Datum:
Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsDate(ComboBox1) Then
MsgBox "ungültiges Datum"
ComboBox1.SetFocus
Exit Sub
End If
End Sub
Ich will wieder zur Combobox1 zurück - die weitere Eingabe in folgende OptionButtons
soll gestoppt werden. Das combobox1.setfocus reagiert nicht.
Ich hatte das irgendwann schon mal find aber nichts mehr und in der
Recherche fand ich auch keinen kurzen Befehl.
Gruss Ludicla - völlig depresiv
Anzeige