ich habe eine Textbox in einem Userform. In diese Textbox gebe ich ein Datum ein un danach berechnen sich Folgetermine in weiteren Textboxen.
Was mich gerade verrückt macht ist die Eingabe des Datums.
Private Sub txtDCV_Change()
Dim dtDCV As Date
Dim dtSCV14 As Date, dtSCV28 As Date, dtSCV42 As Date, dtSCV56 As Date
Dim dtFUS1 As Date, dtFUS3 As Date, dtFUS7 As Date, dtFus10 As Date
dtDCV = CDate(txtDCV.Value)
txtSCV14.Value = dtDCV + 12
txtSCV28.Value = dtDCV + 26
txtSCV42.Value = dtDCV + 40
txtSCV56.Value = dtDCV + 54
End Sub
Gebe ich das Datum in der Form 1.1.1900 ein, ist alles ok. Verwende ich dagegen alternative Eingaben wie 1-1-1900 oder 1/1/1900 steigt das Programm beim zweiten - bzw. beim ersten / mit der Fehlermeldung "Laufzeitfehler 13 Typen unverträglich" aus.Wie bekomme ich das Userform dazu, die alternativen EIngaben zu akzeptieren?
Gruß,
PQuest:-)