Fields.Add 方法 (Word)
将 Field 对象添加到 Fields 集合。 返回指定范围内的 Field 对象。
表达式。添加 (Range、 Type、 Text、 PreserveFormatting)
expression 是必需的。 一个代表“Fields”集合的变量。
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Range | 必需 | Range 对象 | 需要添加域的区域。 如果该区域未折叠,那么域将替换该区域。 |
Type | 可选 | Variant | 可以是任意 WdFieldType 常量。 有关有效的常量列表,请参阅“对象浏览器”。 默认值为 wdFieldEmpty。 |
Text | 可选 | Variant | 域所需的其他文本。 例如,如果要给域指定一个开关,可将其添加到此处。 |
PreserveFormatting | 可选 | Variant | 如果该属性值为 True,则更新时保留域所应用的格式。 |
Field
无法使用 Fields 集合的Add 方法插入某些字段 (,例如 wdFieldOCX 和 wdFieldFormCheckBox) 。 相反,必须使用特定方法,例如 AddOLEControl 方法和 FormFields 集合的 Add 方法。
本示例在选定内容的开始处插入一个 USERNAME 域。
Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
Type:=wdFieldUserName)
本示例在所选内容的末尾插入一个 LISTNUM 域。 起始开关设为从 3 开始。
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Fields.Add Range:=Selection.Range, _
Type:=wdFieldListNum, Text:="\s 3"
本示例在选定内容的开始处插入一个 DATE 域,然后显示域结果。
Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
Type:=wdFieldDate)
MsgBox myField.Result
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。