Die Funktion VBA Year gibt eine Ganzzahl zurück, die dem Jahr des angegebenen Datums entspricht.
Year(Datum)
Verwenden der Funktion Year zum Abrufen relevanter Informationen aus einem Datum:
Sub YearExample1() myDate = #10/30/2020# MsgBox Year(myDate) 'Rückgabe: 2020 End Sub
Diese Funktion akzeptiert auch ein Datum im Textformat:
Sub YearExample2() myDate = "30.10.2020" MsgBox Year(myDate) 'Rückgabe: 2020 End Sub