Wie kann ich das Jahr eines Datums auslesen? Ich möchte einfach die normale Excelfunktion JAHR() verwenden, die letzte Zeile des untigen Makros funktioniert aber nicht. Bekomme Laufzeitfehler 438, "Objekt unterstützt diese Eigenschaft oder Methode nicht"?
Danke im voraus
lg
gothino
Sub test()
Dim year As Integer
Dim datum As Date
Dim txt As String
txt = "01.01.2003"
datum = CDate(txt)
year = Application.year(datum)
End Sub