Question

多种对象 Fields (Field) 多种对象

由 Field 对象所组成的集合，该集合中的元素代表了选定内容、区域或文档中所有的域。

使用 Fields 集合

用 Fields 属性可返回 Fields 集合。下列示例更新选定内容中所有的域。

Selection.Fields.Update

用 Add 方法可在 Fields 集合中添加域。下列示例在选定内容的开头插入日期域并显示其结果。

Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
 Type:=wdFieldDate)
MsgBox myField.Result

用 Fields(index) 可返回单个的 Field 对象，其中index 是索引序号。索引序号代表该域在选定内容、区域或文档中的位置。下列示例显示活动文档中第一个域的域代码和结果。

If ActiveDocument.Fields.Count >= 1 Then
 MsgBox "Code =  " & ActiveDocument.Fields(1).Code & vbCr _
 & "Result =  " & ActiveDocument.Fields(1).Result & vbCr
End If

说明

用 MailMerge 对象的 Fields 属性可返回 MailMergeFields 集合。

文档中该集合的 Count 属性仅返回正文部分的项目数。使用集合的 Range 对象可计算其他部分的项目数。