Если вы создаете макрос для обработки документа, вам может потребоваться вычислить дату в какой-то момент в будущем. С помощью функции VBA DateAdd это довольно просто. Функция имеет следующий синтаксис:

DateAdd(interval, number, startdate)

Исходная дата, с которой вы начинаете (обычно сегодняшняя дата), указывается аргументом startdate. Аргумент interval указывает, что вы хотите добавить к startdate. Например, если вы хотите добавить дни, тогда interval будет буквой d. (Этот интервал должен быть заключен в кавычки.) Вы можете указать много разных интервалов:

Interval

Meaning

d

Day

ww

Week

m

Month

q

Quarter

yyyy

Year

y

Day of year

w

Weekday

h

Hour

n

Minute

s

Second

Наконец, аргумент number указывает, сколько интервалов вы хотите добавить к дате.

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

dFutureDate = DateAdd("d", 90, Date)

При выполнении dFutureDate содержит дату, которая наступает через 90 дней после сегодняшнего дня.

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1476) применим к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:

link: / wordribbon-Calculating_a_Future_Date [Расчет будущей даты].