Range.InsertDateTime method (Word)

Inserts the current date or time, or both, either as text or as a TIME field.

Syntax

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

expression Required. A variable that represents a Range object.

Name	Required/Optional	Data type	Description
DateTimeFormat	Optional	Variant	The format to be used for displaying the date or time, or both. If this argument is omitted, Microsoft Word uses the short-date style from the Windows Control Panel (Regional Settings icon).
InsertAsField	Optional	Variant	True to insert the specified information as a TIME field. The default value is True.
InsertAsFullWidth	Optional	Variant	True to insert the specified information as double-byte digits. This argument may not be available to you, depending on the language support (U.S. English, for example) that you have selected or installed.
DateLanguage	Optional	Variant	Sets the language in which to display the date or time. Can be either of the WdDateLanguage constants. This argument may not be available to you, depending on the language support (U.S. English, for example) that you have selected or installed.
CalendarType	Optional	Variant	Sets the calendar type to use when displaying the date or time. Can be either of the WdCalendarTypeBi constants. This argument may not be available to you, depending on the language support (U.S. English, for example) that you have selected or installed.

This example inserts the current date at the end of the active document. A possible result might be "01/12/99."

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

This example inserts a TIME field for the current date in the footer for the active document.

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