Share via


Range.InsertDateTime Method

Word Developer Reference

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.

Parameters

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’ve 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’ve 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’ve selected or installed.

Example

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

Visual Basic for Applications
  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.

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

See Also