Wer kann mal schauen?
Die ComboBox4 soll das Datum im DD.MM.YYYY eintragen. funzt aber nicht.
Sheets("Belegungsübersicht").Range("B2").Value = Format(ComboBox4, "DD.MM.YYYY").Value
Gruss
achim h.
Private Sub ComboBox4_Change()
ComboBox4 = CDate(ComboBox4)
Range("B2") = CDate(ComboBox4)
End Sub
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe