Функция DateAdd
Возвращает значение типа Variant (Date), содержащее результат прибавления к дате указанного интервала времени.
Синтаксис
DateAdd(интервал, число, дата)
Синтаксис функции DateAdd имеет эти именованные аргумент:
| Часть | Описание |
|---|---|
| интервал | Обязательный аргумент. Строковое выражение, представляющее интервал времени, который требуется добавить. |
| число | Обязательный аргумент. Числовое выражение, представляющее число интервалов, которые требуется добавить. Может быть, положительным (для получения дат в будущем) или отрицательным (для получения дат в прошлом). |
| дата | Обязательный аргумент. Значение Variant (Date) или литерал, представляющий дату, к которой был добавлен интервал. |
Параметры
Аргументinterval имеет следующие параметры:
| Setting | Описание |
|---|---|
| yyyy | Год |
| q | Квартал |
| m | Месяц |
| y | День года |
| d | День |
| w | День недели |
| ww | Неделя |
| h | Часы |
| n | Минуты |
| s | Секунды |
Примечания
Используйте функцию DateAdd для добавления указанного интервала времени к дате или его вычитания из нее. Например, функцию DateAdd можно применять, чтобы вычислить дату, отстоящую на 30 дней от сегодняшнего дня, или время через 45 минут.
Чтобы добавить дни к аргументу дата, используйте значения "День года" ("y"), "День" ("d") или "День недели" ("w").
Примечание.
Когда для добавления к дате используется интервал "w" (включающий все дни недели — с воскресенья по субботу), функция DateAdd добавляет к дате общее число указанных дней, а не только число рабочих дней (с понедельника по пятницу), как вы, возможно, предполагали.
Функция DateAdd не может возвращать недопустимые даты. В следующем примере к 31 января прибавляется 1 месяц:
DateAdd("m", 1, "31-Jan-95")
В данном случае DateAdd возвращает 28-фев-95, а не 31-фев-95. Если дата имеет значение 31-янв-96, возвращаемым значением будет 29-фев-96, поскольку 1996 год — високосный.
Если вычисляемая дата предшествует 100 году (т. е. вычитается больше лет, чем указано в аргументе дата), возникает ошибка.
Если число не является значением типа Long, оно округляется до ближайшего целого числа перед вычислением.
Примечание.
Формат возвращаемого значения для функции DateAdd определяется параметрами панели управления, а не форматом, передаваемым в аргументе дата.
Примечание.
Если в свойстве Calendar задан григорианский календарь, аргумент дата следует указывать соответствующим образом. Если используется календарь Хиджра, дата должна соответствовать ему. Если значением месяца является название, оно должно соответствовать текущим параметрам свойства Calendar. Чтобы уменьшить вероятность несоответствия названий месяцев текущим параметрам свойства Calendar, вводите числовые значения месяцев (используйте краткий формат даты).
Пример
В этом примере берется некоторая дата и с помощью функции DateAdd отображается дата, соответствующая ей через указанное число месяцев в будущем.
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.