全部显示

MailMergeWizardSendToCustom 事件

       

在“邮件合并向导”的步骤六中单击自定义按钮时,该事件发生。

Private Sub object_MailMergeWizardSendToCustom(ByVal Doc As Document)

object  在类模块事件中声明的 Application 类型对象。有关使用 Application 对象事件的详细信息,请参阅使用 Application 对象事件

Doc   邮件合并主文档。

说明

使用 ShowSendToCustom 属性在“邮件合并向导”的步骤六中创建一个自定义按钮。

示例

该示例在用户单击自定义目标按钮时,执行到传真机的合并。该示例假定用户可以访问自定义目标按钮,数据源中每一条记录包含传真号码,并且声明了一个名为 MailMergeApp 的应用程序变量,并将 Word Application 对象赋给该变量。

Private Sub MailMergeApp_MailMergeWizardSendToCustom(ByVal Doc As Document)
    With Doc.MailMerge
        .Destination = wdSendToFax
        .Execute
    End With
End Sub