Gibt einen Wert des Typs Variant (Date) für ein angegebenes Jahr, einen Monat und einen Tag zurück.

Syntax

DateSerial ( Jahr, Monat, Tag )

Warnung    Stellen Sie sicher, dass sich die Argumente im richtigen Wertebereich befinden. Ein ungültiges Argument kann zu einem falschen Ergebnis führen.

Die Syntax der Funktion DateSerial weist die folgenden Argumente auf:

Argument

Beschreibung

Jahr

Erforderlich. Integer. Zahl zwischen 100 und 9999 (einschließlich) oder Numerischer Ausdruck.

Monat

Erforderlich. Integer. Beliebiger numerischer Ausdruck.

Tag

Erforderlich. Integer. Beliebiger numerischer Ausdruck.

Hinweise

Um ein Datum anzugeben, z. B. den 31. Dezember 1991, sollte sich der Zahlenbereich für jedes DatumsserialArgument im akzeptierten Bereich für die Einheit liegen. d. h. 1 bis 31 für Tage und 1 bis 12 für Monate. Sie können jedoch auch relative Datumsangaben für jedes Argument mithilfe eines beliebigen numerischen Ausdrucks angeben, der einige Tage, Monate oder Jahre vor oder nach einem bestimmten Datum darstellt.

Im folgenden Beispiel werden numerische Ausdrücke anstelle absoluter Datumszahlen verwendet. Hier gibt die DateSerial-Funktion ein Datum zurück, das den Tag vor dem ersten Tag (1 - 1), zwei Monate vor August (8 - 2), 10 Jahre vor 1990 (1990 - 10); anders ausgedrückt: 31. Mai 1980.

DateSerial(1990 - 10, 8 - 2, 1 - 1)

Zweistellige Jahresangaben für das Jahr-Argument werden entsprechend den benutzerdefinierten Computereinstellungen interpretiert. Die Standardeinstellung gibt vor, dass Werte zwischen 0 und 29 (einschließlich) als die Jahre 2000 bis 2029 interpretiert werden. Die Standardwerte zwischen 30 und 99 werden als die Jahre 1930 bis 1999 interpretiert. Für alle anderen Jahr-Argumente wird eine vierstelligen Jahresangabe (z. B. 1800) verwendet.

In Windows-Versionen vor Windows 2000 werden zweistellige Jahresangaben entsprechend den oben beschriebenen Standardeinstellungen interpretiert. Um sicherzustellen, dass die Funktion jeweils den korrekten Wert zurückgibt, sollten Sie eine vierstelligen Jahresangabe verwenden.

Wenn ein Argument den für es gültigen Bereich überschreitet, wird es auf die entsprechende nächstgrößere Einheit erhöht. Wenn Sie beispielsweise 35 Tage angeben, wird dies als ein Monat und einige Tage ausgewertet, je nachdem, auf welchen Bereich des Jahres die Angabe angewendet wird. Liegt irgendein Argument außerhalb des Bereichs von -32.768 bis 32.767 ist, tritt ein Fehler auf. Wenn das durch die drei Argumente angegebene Datum außerhalb des zulässigen Datumsbereichs liegt, tritt ein Fehler auf.

Hinweis: Ist die Calendar-Eigenschaft auf den gregorianischen Kalender festgelegt, werden die für Jahr, Monat, und Tag angegebenen Werte als Werte des gregorianischen Kalender interpretiert. Ist die Calendar-Eigenschaft auf Hijri festgelegt, wird der jeweils angegeben Wert als Wert des Hijri-Kalender interpretiert.

Der zurückgegebene Datumsbestandteil liegt in Zeitraumeinheiten des aktuellen Visual Basic-Kalenders vor. Wenn beispielsweise der aktuelle Kalender ein Hijri-Kalender ist und der zurückzugebende Datumsbestandteil das Jahr ist, ist der Jahreswert ein Hijri-Jahr. Für das Argument Jahr werden Werte zwischen 0 und 99 (einschließlich) als die Jahre 1400 bis1499 interpretiert. Verwenden Sie für alle anderen Jahr-Werte die jeweilige vollständige vierstellige Jahresangabe (z. B. 1520).

Abfragebeispiel

Ausdruck

Ergebnisse

SELECT Dateserial(2018;12,13) AS NewDate FROM ProductSales;

Gibt das "Datum" für das angegebene Jahr, den Monat und den Angegebenen Tag zurück, das in die Argumente der Funktion eingegeben wurde und in der Spalte "NewDate" angezeigt wird. Ergebnis: "12.13.2018".

VBA-Beispiel

Hinweis: Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

In diesem Beispiel wird die DateSerial-Funktion verwendet, um das Datum für das angegebene Jahr, den angegebenen Monat und den angegebenen Tag zurückzugeben.

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

Auswählen der richtigen Datumsfunktion

Benötigen Sie weitere Hilfe?

Ihre Office-Fähigkeiten erweitern
Schulungen erkunden
Neue Funktionen als Erster erhalten
Microsoft Insider beitreten

War diese Information hilfreich?

Wie zufrieden sind Sie mit der Übersetzungsqualität?
Was hat Ihre Erfahrung beeinflusst?

Vielen Dank für Ihr Feedback!

×