TextBox CDate Laufzeitfehler 13
19.02.2018 09:13:10
Merc
Habe ein Problem mit meinen TextBoxen in einer Userform.
Um die spätere Bearbeitung von Zeitangaben zu erleichtern wollte ich das Format einheitlich machen.
Leider kommt ein Laufzeitfehler 13 Typen unverträglich wenn ich die Textbox ohne Inhalt hinterlasse oder direkt beim Start der Userform in eine der Textboxen reinklicke.
Freue mich über jeden Tipp!
Hier meine Code für die Textboxen in der Userform:
Private Sub TextBox6_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox6.Text = Format(CDate(TextBox6.Text), "hh:mm")
End Sub
Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox7.Text = Format(CDate(TextBox7.Text), "hh:mm")
End Sub