VBA-Jahresfunktion

Jahr Beschreibung

Gibt ein vierstelliges Jahr (eine Zahl von 1900 bis 9999) bei einem Datumswert zurück.

Einfache Jahresbeispiele

Hier ist ein einfaches Jahr-Beispiel:

123	Sub Year_Example()MsgBox-Jahr("1.1.2019")End Sub

Dieser Code gibt 2022 zurück.

Jahressyntax

Im VBA-Editor können Sie „Year(“ eingeben, um die Syntax für die Year-Funktion anzuzeigen:

Die Funktion Year enthält ein Argument:

Datum: Ein gültiges Datum.

Beispiele für die Excel VBA-Jahresfunktion

1	MsgBox-Jahr("1.1.1999")

Ergebnis: 1999

1	MsgBox-Jahr(#1/1/2001 1:30:00 #)

Ergebnis: 2001

1	MsgBox-Jahr("01.01.05")

Ergebnis: 1905

1	MsgBox-Jahr (Datum)

Ergebnis ist das Jahr des aktuellen Systemdatums.