FieldNames 属性

       

返回一个 MailMergeFieldNames 集合,该集合代表了指定邮件合并数据源中所有域的名称。只读。

有关返回集合中单个成员的内容,请参阅返回集合中的对象

示例

本示例显示附加到活动邮件合并主文档的数据源中第一个域的名称。

MsgBox ActiveDocument.MailMerge.DataSource.FieldNames(1).Name

本示例使用 mNames() 数组保存包含在附加到活动文档的数据源中每个合并域的名称。

Dim mNames As Variant
Dim mmTemp As MailMerge
Dim intCount As Integer
Dim intIncrement As Integer
Dim mmfnLoop As MailMergeFieldName

Set mmTemp = ActiveDocument.MailMerge
intCount = _
    ActiveDocument.MailMerge.DataSource.FieldNames.Count - 1

ReDim mNames(intCount)
intIncrement = 0

For Each mmfnLoop In mmTemp.DataSource.FieldNames
    mNames(intIncrement) = mmfnLoop.Name
    intIncrement = intIncrement + 1
Next mmfnLoop