AddMergeRec 方法

向邮件合并主文档添加一个 MERGEREC 域。返回一个 MailMergeField 对象。在邮件合并过程中，MERGEREC 域将插入当前数据记录的编号（即在当前查询结果中数据记录的位置）。

expression   必需。该表达式返回一个 MailMergeFields 对象。

Range   Range 对象，必需。指 MERGEREC 域的位置。

示例

本示例在活动文档的开始处插入文字和一个 MERGEREC 域。

Dim rngTemp As Range

Set rngTemp = ActiveDocument.Range(Start:=0, End:=0)

ActiveDocument.MailMerge.Fields.AddMergeRec Range:=rngTemp
rngTemp.InsertAfter "Record Number: "