以文本或 TIME 域的方式插入当前的日期或时间,或将两者都插入。
expression.InsertDateTime(DateTimeFormat, InsertAsField, InsertAsFullWidth, DateLanguage, CalendarType)
expression 必需。该表达式返回一个 Range 或 Selection 对象。
DateTimeFormat Variant 类型,可选。显示日期或时间,或同时显示日期和时间所用的格式。如果省略该参数,Microsoft Word 将使用 Windows“控制面板”中的“区域设置”所规定的短日期样式。
InsertAsField Variant 类型,可选。如果本属性为 True,则以 TIME 域的形式插入指定的信息。默认值为 True。
InsertAsFullWidth Variant 类型,可选。如果本参数为 True,则以双字节数字的形式插入指定信息。由于选择或安装的语言支持(例如美国英语)不同,该参数可能无法使用。
DateLanguage Variant 类型,可选。设置显示日期或时间的语言形式。可取下列 WdDateLanguage 常量之一:wdDateLanguageBidi 或 wdDateLanguageLatin。由于选择或安装的语言支持(例如美国英语)不同,该参数可能无法使用。
CalendarType Variant 类型,可选。设置显示日期或时间的日历类型。可取下列 WdCalendarTypeBi 常量之一:wdCalendarTypeBidi 或 wdCalendarTypeGregorian。由于选择或安装的语言支持(例如美国英语)不同,该参数可能无法使用。
本示例以 TIME 域的形式插入当前日期。可能的结果是“11/18/1999”。
Selection.InsertDateTime DateTimeFormat:="MMMM dd, yyyy", _
InsertAsField:=True
本示例在活动文档的末尾插入当前日期。可能的结果是“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