Document.MailMergeWizardSendToCustom 事件
定义
重要
一些信息与预发行产品相关,相应产品在发行之前可能会进行重大修改。 对于此处提供的信息,Microsoft 不作任何明示或暗示的担保。
在“邮件合并向导”的第六步中单击自定义按钮时发生。
public:
event EventHandler ^ MailMergeWizardSendToCustom;
event EventHandler MailMergeWizardSendToCustom;
member this.MailMergeWizardSendToCustom : EventHandler
Event MailMergeWizardSendToCustom As EventHandler
事件类型
示例
下面的代码示例在单击自定义目标按钮时执行合并。 此示例假定你有权访问自定义目标按钮。 此示例适用于应用程序级外接程序。
private void DocumentMailMergeWizardSendToCustom()
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.MailMergeWizardSendToCustom += new
EventHandler(ThisDocument_MailMergeWizardSendToCustom);
}
void ThisDocument_MailMergeWizardSendToCustom(object sender, EventArgs e)
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.MailMerge.ShowSendToCustom = "Custom Destination";
vstoDoc.MailMerge.Destination = Microsoft.Office.Interop
.Word.WdMailMergeDestination.wdSendToNewDocument;
vstoDoc.MailMerge.Execute(ref missing);
}
Private Sub DocumentMailMergeWizardSendToCustom()
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
AddHandler vstoDoc.MailMergeWizardSendToCustom, AddressOf ThisDocument_MailMergeWizardSendToCustom
End Sub
Private Sub ThisDocument_MailMergeWizardSendToCustom(ByVal sender As Object, ByVal e As EventArgs)
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.MailMerge.ShowSendToCustom = "Custom Destination"
vstoDoc.MailMerge.Destination = Microsoft.Office.Interop.Word.WdMailMergeDestination. _
wdSendToNewDocument
vstoDoc.MailMerge.Execute()
End Sub
注解
ShowSendToCustom使用 属性在邮件合并向导的第六个步骤上创建自定义按钮。