返回或设置活动邮件合并数据记录。可以是查询结果中的一个有效数据记录号,也可以是下列可读写 WdMailMergeActiveRecord 常量之一。
WdMailMergeActiveRecord 可以是这些 WdMailMergeActiveRecord 常量之一。 |
wdLastRecord |
wdNoActiveRecord |
wdFirstRecord |
wdNextRecord |
wdPreviousRecord |
注意 活动的数据记录号是当前查询选项生成的查询结果中的记录的位置。同样,这个记录号也不一定是记录在数据源中的位置。
本示例在活动文档中隐藏邮件合并域代码,以便在主文档中显示合并数据。然后数据源中下一条记录变成活动记录。
If ActiveDocument.MailMerge.MainDocumentType <> _
wdNotAMergeDocument Then
With ActiveDocument.MailMerge
.ViewMailMergeFieldCodes = False
.DataSource.ActiveRecord = wdNextRecord
End With
End If
本示例返回 Main2.doc 中的活动数据记录的数字位置。
Dim intRecordNumber as Integer
If Documents("Main2.doc").MailMerge.State = _
wdMainAndDataSource Or _
wdMainAndSourceAndHeader Then
intRecordNumber = Documents("Main2.doc").MailMerge _
.DataSource.ActiveRecord
End If