Year-FunktionYear function

Gibt ein Variant-Objekt (Ganzzahl) mit einer ganzen Zahl für das Jahr zurück.Returns a Variant (Integer) containing a whole number representing the year.

SyntaxSyntax

Jahr (Datum)Year(date)

Das Argument required Date ist eine beliebige Variante, ein numerischer Ausdruck, ein Zeichenfolgenausdruckoder eine beliebige Kombination, die ein Datum darstellen kann.The required date argument is any Variant, numeric expression, string expression, or any combination, that can represent a date. Wenn date den Wert Null enthält, wird Null zurückgegeben.If date contains Null, Null is returned.

Hinweis

Wenn die Einstellung der Calendar -Eigenschaft Gregorianische ist, stellt die zurückgegebene ganze Zahl das gregorianische Jahr für das Argument date dar.If the Calendar property setting is Gregorian, the returned integer represents the Gregorian year for the date argument. Wenn es sich bei dem Kalender um Hijri handelt, stellt die zurückgegebene ganze Zahl das Hijri-Jahr für das Argument date dar.If the calendar is Hijri, the returned integer represents the Hijri year for the date argument. Bei Hijri-Daten ist die Argument Nummer ein beliebiger numerischer Ausdruck, der ein Datum und/oder eine Uhrzeit vom 1/1/100 (gregorianisches Aug 2, 718) bis 4/3/9666 (gregorianisches Dec 31, 9999) darstellen kann.For Hijri dates, the argument number is any numeric expression that can represent a date and/or time from 1/1/100 (Gregorian Aug 2, 718) through 4/3/9666 (Gregorian Dec 31, 9999).

BeispielExample

In diesem Beispiel wird die Year -Funktion zum Abrufen des Jahres aus einem angegebenen Datum verwendet.This example uses the Year function to obtain the year from a specified date. In der Entwicklungsumgebung wird das Datums-Literal im kurzen Datumsformat mithilfe der Gebietsschemaeinstellungen Ihres Codes angezeigt.In the development environment, the date literal is displayed in short date format by using the locale settings of your code.

Dim MyDate, MyYear
MyDate = #February 12, 1969#    ' Assign a date.
MyYear = Year(MyDate)    ' MyYear contains 1969.

Siehe auchSee also

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.