Word VBA教程:ActiveRecord属性

返回或设置活动邮件合并数据记录。可以是查询结果中的一个有效数据记录号,也可以是下列可读写WdMailMergeActiveRecord 常量之一。

WdMailMergeActiveRecord 可以是这些 WdMailMergeActiveRecord 常量之一。
wdLastRecord
wdNoActiveRecord
wdFirstRecord
wdNextRecord
wdPreviousRecord

注意   活动的数据记录号是当前查询选项生成的查询结果中的记录的位置。同样,这个记录号也不一定是记录在数据源中的位置。

VBA示例

本示例在活动文档中隐藏邮件合并域代码,以便在主文档中显示合并数据。然后数据源中下一条记录变成活动记录。


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号