DateSerial-FunktionDateSerial function

Gibt einen Variant-Wert (Date) für ein bestimmtes Jahr, einen bestimmten Monat und einen bestimmten Tag zurück.Returns a Variant (Date) for a specified year, month, and day.

SyntaxSyntax

DateSerial(year, month, day)DateSerial(year, month, day)


Die Syntax der DateSerial-Funktion enthält die folgenden benannten Argumente:The DateSerial function syntax has these named arguments:

PartPart BeschreibungDescription
yearyear Erforderlich; Ganze Zahl.Required; Integer. Zahl zwischen 100 und 9999 (einschließlich) oder einen numerischen Ausdruck.Number between 100 and 9999, inclusive, or a numeric expression.
Monatmonth Erforderlich; Ganze Zahl.Required; Integer. Beliebiger numerischer Ausdruck.Any numeric expression.
dayday Erforderlich; Ganze Zahl.Required; Integer. Jeder numerischer Ausdruck.Any numeric expression.

HinweiseRemarks

An einem Datum, z. B. zum 31. Dezember 1991, sollte der Zahlenbereich für jedes DateSerial Argument im zulässigen Bereich für die Maßeinheit liegen, d. h. 1–31 für Tage und 1–12 für Monate.To specify a date, such as December 31, 1991, the range of numbers for each DateSerial argument should be in the accepted range for the unit; that is, 1–31 for days and 1–12 for months. Sie können jedoch auch relative Datumswerte für jedes Argument angeben, indem Sie einen beliebigen numerischen Ausdruck verwenden, der eine Anzahl von Tagen, Monaten oder Jahren vor oder nach einem bestimmten Datum angibt.However, you can also specify relative dates for each argument by using any numeric expression that represents some number of days, months, or years before or after a certain date.

Im folgende Beispiel werden numerische Ausdrücke anstelle von absoluten Datumswerten verwendet.The following example uses numeric expressions instead of absolute date numbers. Hierbei gibt die DateSerial-Funktion ein Datum zurück, bei dem es sich um den Tag vor dem ersten Tag (1 - 1) handelt, zwei Monate vor August (8 - 2), 10 Jahre vor 1990 (1990 - 10), das heißt, 31. Mai 1980.Here the DateSerial function returns a date that is the day before the first day (1 - 1), two months before August (8 - 2), 10 years before 1990 (1990 - 10); in other words, May 31, 1980.

Unter Windows 98 oder Windows 2000 werden zweistellige Jahreswerte für das Jahr-Argument auf Grundlage der benutzerdefinierten Computereinstellungen interpretiert.Under Windows 98 or Windows 2000, two digit years for the year argument are interpreted based on user-defined machine settings. Die Standardeinstellungen sind Werte zwischen 0 und 29 (einschließlich), sie werden als die Jahre 2000–2029 interpretiert.The default settings are that values between 0 and 29, inclusive, are interpreted as the years 2000–2029. Die Standardwerte zwischen 30 und 99 werden als die Jahre 1930–1999 interpretiert.The default values between 30 and 99 are interpreted as the years 1930–1999. Verwenden Sie für alle anderen Jahr-Argumente eine vierstellige Jahresangabe (z. B. 1800).For all other year arguments, use a four-digit year (for example, 1800).

Frühere Versionen von Windows interpretieren zweistellige Jahresangaben entsprechend den oben beschriebenen Standardeinstellungen.Earlier versions of Windows interpret two-digit years based on the defaults described earlier. Um sicherzustellen, dass die Funktion den korrekten Wert zurückgibt, verwenden Sie eine vierstellige Jahresangabe.To be sure the function returns the proper value, use a four-digit year.

Wenn ein Argument den zulässigen Bereich für das Argument überschreitet, wird es ggf. auf die nächstgrößere Einheit geändert.When any argument exceeds the accepted range for that argument, it increments to the next larger unit as appropriate. Wenn Sie beispielsweise 35 Tage angeben, wird es als ein Monat und einige Tage gewertet, je nachdem, zu welchem Zeitpunkt im Jahr es angewendet wird.For example, if you specify 35 days, it is evaluated as one month and some number of days, depending on where in the year it is applied. Wenn ein Argument außerhalb des zulässigen Bereichs von -32.768 bis 32.767 liegt, tritt ein Fehler auf.If any single argument is outside the range -32,768 to 32,767, an error occurs. Wenn das durch die drei Argumente angegebene Datum außerhalb des zulässigen Datumsbereichs liegt, tritt ein Fehler auf.If the date specified by the three arguments falls outside the acceptable range of dates, an error occurs.

Hinweis

Für Jahr, Monat, und Tag, wird bei dem angegegebenen Wert davon ausgegangen, er wäre gregorianisch, wenn die ** Calender **-Eigenschaft Gregorianisch lautet.For year, month, and day, if the Calendar property setting is Gregorian, the supplied value is assumed to be Gregorian. Wenn die Calender-Eigenschaftseinstellung Hijri lautet, wird bei dem angegegebenen Wert davon ausgegangen, dass es Hijri ist.If the Calendar property setting is Hijri, the supplied value is assumed to be Hijri.

Der zurückgegebene Datumsbestandteil wird in Zeitraumeinheiten des aktuellen arabischen Kalenders angegeben.The returned date part is in the time period units of the current Visual Basic calendar. Wenn der aktuelle Kalender ein Hijri-Kalender ist und der zurückzugebenden Datumsbestandteil das Jahr ist, so ist der Jahreswert ein Hijri-Jahr.For example, if the current calendar is Hijri and the date part to be returned is the year, the year value is a Hijri year. Für das Argument year werden Werte zwischen 0 und 99 (einschließlich) als die Jahre 1400–1499 interpretiert.For the argument year, values between 0 and 99, inclusive, are interpreted as the years 1400–1499. Verwenden Sie für alle anderen Jahr-Werte die vollständige vierstellige Jahresangabe (z. B. 1520).For all other year values, use the complete four-digit year (for example, 1520).

BeispielExample

In diesem Beispiel wird mit der DateSerial-Funktion das Datum für das angegebene Jahr, den Monat und den Tag zurückgegeben.This example uses the DateSerial function to return the date for the specified year, month, and day.

Dim MyDate
' MyDate contains the date for February 12, 1969.
MyDate = DateSerial(1969, 2, 12)    ' Return a date.

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.