DateAdd-Funktion

Gibt einen Wert vom Typ Variant (Date) zurück, der ein Datum enthält, zu dem ein angegebenes Zeitintervall addiert wurde.

Syntax

DateAdd(interval, number, date)

Die Syntax für die DateAdd-Funktion besteht aus den folgenden benannten Argumenten:

Teil	Beschreibung
Intervall	Erforderlich. Ein Zeichenfolgenausdruck, der das zu addierende Zeitintervall ergibt.
number	Erforderlich. Numerischer Ausdruck, d. h. die Anzahl der Intervalle, die Sie hinzufügen möchten. Er kann positiv (zum Abrufen von Datumswerten in der Zukunft) oder negativ (zum Abrufen von Datumswerten in der Vergangenheit) sein.
date	Erforderlich. Variant (Date) oder Literal, das das Datum darstellt, zu dem das Intervall hinzugefügt wird.

Einstellungen

Das Argumentinterval hat die folgenden Einstellungen:

Einstellung	Beschreibung
yyyy	Jahr
q	Quartal
m	Monat
y	Tag des Jahres
d	Tag
w	Wochentag
ww	Woche
h	Stunde
n	Minute
s	Zweiter

Hinweise

Sie können die DateAdd-Funktion verwenden, um ein angegebenes Zeitintervall zum Datum hinzuzuaddieren oder davon zu subtrahieren. Sie können DateAdd zum Beispiel verwenden, um ein Datum zu berechnen, das nach 30 Tagen nach dem aktuellen Datum liegt, oder eine Uhrzeit, die 45 Minuten nach der aktuellen Zeit liegt.

Um Tage zu date zu addieren, können Sie Tag des Jahres ("y"), Tag ("d") oder Wochentag ("w") verwenden.

Hinweis

Wenn Sie das Intervall "w" verwenden (welches alle Wochentage von Sonntag bis Samstag enthält), um Tage zu einem Datum hinzuzufügen, addiert die DateAdd-Funktion die gesamte Anzahl der angegebenen Tage zum Datum, anstatt einfach nur die Anzahl an Arbeitstagen zu addieren (Montag bis Freitag), wie Sie es gewohnt sind.

Die DateAdd-Funktion gibt kein ungültiges Datum zurück. Das folgende Beispiel addiert zum 31. Januar einen Monat hinzu:

DateAdd("m", 1, "31-Jan-95")

In diesem Fall gibt DateAdd 28-Feb-95 und nicht 31-Feb-95 zurück. Wenn date 31-Jan-96 lautet, wird 29-Feb-96 zurückgegeben, da 1996 ein Schaltjahr ist.

Liegt das berechnete Datum vor dem Jahr 100 (d. h. Sie subtrahieren mehr Jahre, als in date) vorhanden sind), tritt ein Fehler auf.

Wenn number kein Wert vom Typ Long ist, wird er vor der Auswertung auf die nächste ganze Zahl gerundet.

Hinweis

Das Format des Rückgabewerts für DateAdd wird durch die Einstellungen in der Systemsteuerung bestimmt und nicht durch das vom date-Argument übergebene Format.

Hinweis

Das für date angegebene Datum muss ein gregorianisches Datum sein, wenn die Einstellung der Calendar-Eigenschaft dem gregorianischen Kalender entspricht. Wenn es sich um einen Hijri-Kalender handelt, muss das angegebene Datum ein Hijri-Datum sein. Wenn die Monatswerte als Namen angegeben werden, muss der Name mit der aktuellen Calendar-Eigenschaftseinstellung übereinstimmen. Um die Wahrscheinlichkeit zu verringern, dass Monatsnamen mit der aktuellen Calendar-Eingeschaftseinstellung kollidieren, geben Sie nur numerisch Monatswerte ein (kurzes Datumsformat).

Beispiel

In diesem Beispiel wird ein Datum verwendet und mithilfe der DateAdd-Funktion, ein entsprechendes Datum angezeigt, das eine bestimmte Anzahl von Monaten in der Zukunft liegt.

Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg As String
IntervalType = "m"    ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

Siehe auch

• Funktionen (Visual Basic for Applications)

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.