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
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.