Document.MailMergeWizardSendToCustom Событие

Определение

Пространство имен:

Microsoft.Office.Tools.Word

Сборки:

Microsoft.Office.Tools.Word.dll, Microsoft.Office.Tools.Word.v4.0.Utilities.dll

Событие происходит при нажатии настраиваемой кнопки на шестом этапе Мастера слияния.

public:
 event EventHandler ^ MailMergeWizardSendToCustom;

event EventHandler MailMergeWizardSendToCustom;

member this.MailMergeWizardSendToCustom : EventHandler 

Event MailMergeWizardSendToCustom As EventHandler 

Тип события

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 чтобы создать пользовательскую кнопку на шестом шаге мастера слияния почты.