Guten Morgen,
und hier schon das nächste Problem. Dieses mal das Kopieren eines Datums in eine Textbox.
Und zwar möchte ich, dass der früheste und späteste Termin in einem vorher im Worksheet definierten "Bereich" in eine Textbox (tbStDate und tbEndDate) übertragen wird.
Wenn ich den folgenden Code benutze, wird nur 00:00:00 angezeigt:
UserForm2.tbStDate.value = CDate(WorksheetFunction.Min(Bereich))
UserForm2.tbEndDate.value = CDate(WorksheetFunction.Max(Bereich))
Versuche ich das Format zu ändern mit
UserForm2.tbStDate.value = CStr(Format(CDate(WorksheetFunction.Min(Bereich)), "dd.mm.yyyy"))
kommt nur 31.12.1899 raus.
Gibt es dafür eine Abhilfe?
Vielen Dank für Eure Hilfe,
Herzliche Grüße,
Franz