模拟邮件合并操作,在导致出错时停止合并操作并发回相应的报告。
expression.Check
expression 必需。该表达式返回一个 MailMerge 对象。
本示例检查活动文档的邮件合并错误。
Dim intState As Integer
intState = ActiveDocument.MailMerge.State
If intState = wdMainAndDataSource Or _
intState = wdMainAndSourceAndHeader Then
ActiveDocument.MailMerge.Check
End If