Range.InsertDateTime 方法 (Word)
以文本或 TIME 域的形式插入当前日期或时间，或将两者都插入。
语法
表达式。InsertDateTime (DateTimeFormat、 InsertAsField、 InsertAsFullWidth、 DateLanguage、 CalendarType)
expression 是必需的。 一个代表 Range 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| DateTimeFormat | 可选 | Variant | 显示日期或时间或者同时显示两者时所用的格式。 如果省略该参数，Microsoft Word 将使用 Windows“控制面板”（“区域设置”图标）中的短日期样式。 |
| InsertAsField | 可选 | Variant | 真 要插入指定的 TIME 域的信息。 默认值为 True 。 |
| InsertAsFullWidth | 可选 | Variant | 真 要插入双字节数字的形式指定的信息。 此参数可能不可用，这取决于您所选择或安装的语言支持 (例如美国英语)。 |
| 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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。