Метод Application.DateAdd (Project)

Возвращает дату и время, которые следуют за другой датой по заданной длительности для автоматически запланированной задачи.

Синтаксис

выражение. DateAdd( _StartDate_, _Duration_, _Calendar_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
StartDate	Обязательный	Variant	Исходная дата, к которой добавляется длительность.
Duration	Обязательный	Variant	Длительность, добавляемая к дате начала.
Календарь	Необязательный	Object	Ресурс, задача или базовый объект календаря. Значение по умолчанию — календарь активного проекта.

Возвращаемое значение

Variant

Примечания

Чтобы добавить длительность к дате для задачи, запланированной вручную, которая использует эффективный календарь, который может включать нерабочее время, используйте свойство EffectiveDateAdd .

Пример

В следующем примере показана дата окончания трехдневной задачи, которая начинается 11.07.07 в 8 утра.

Sub FindFinishDate() 
 MsgBox Application.DateAdd(StartDate:="7/11/07 8:00 AM", Duration:="3d") 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.