Метод Range.InsertDateTime (Word)

Вставляет текущую дату или время либо как текст, либо как поле TIME.

Синтаксис

expression. InsertDateTime (DateTimeFormat, InsertAsField, InsertAsFullWidth, DateLanguage, CalendarType)

выражение (обязательно). Переменная, представляющая объект Range .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Datetimeformat	Необязательный	Variant	Формат, используемый для отображения даты или времени или и того, и другого. Если этот аргумент опущен, Microsoft Word использует стиль краткой даты из панель управления Windows (значок "Региональные параметры").
InsertAsField	Необязательный	Variant	Значение true , чтобы вставить указанные сведения в качестве поля TIME. Значение по умолчанию — True.
InsertAsFullWidth	Необязательный	Variant	Значение true , чтобы вставить указанные сведения в виде двубайтовых цифр. Этот аргумент может быть вам недоступен в зависимости от выбранной или установленной языковой поддержки (например, английский язык США).
DateLanguage	Необязательный	Variant	Задает язык, на котором будут отображаться дата или время. Может быть любой из констант WdDateLanguage . Этот аргумент может быть вам недоступен в зависимости от выбранной или установленной языковой поддержки (например, английский язык США).
CalendarType	Необязательный	Variant	Задает тип календаря, используемый при отображении даты или времени. Может быть любой из констант WdCalendarTypeBi . Этот аргумент может быть вам недоступен в зависимости от выбранной или установленной языковой поддержки (например, английский язык США).

Пример

В этом примере текущая дата вставляется в конец активного документа. Возможный результат: "01/12/99".

With ActiveDocument.Content 
 .Collapse Direction:=wdCollapseEnd 
 .InsertDateTime DateTimeFormat:="MM/dd/yy", _ 
 InsertAsField:=False 
End With

В этом примере в колонтитул активного документа вставляется поле TIME для текущей даты.

ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range _ 
 .InsertDateTime DateTimeFormat:="MMMM dd, yyyy", _ 
 InsertAsField:=True

См. также

Объект Range

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

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