Document.MailMergeWizardSendToCustom Événement

Référence

Définition

Espace de noms:: Microsoft.Office.Tools.Word

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

Important

Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.

Se produit quand l’utilisateur clique sur le bouton personnalisé à l’étape six de l’Assistant Publipostage.

public:
 event EventHandler ^ MailMergeWizardSendToCustom;

event EventHandler MailMergeWizardSendToCustom;

member this.MailMergeWizardSendToCustom : EventHandler

Event MailMergeWizardSendToCustom As EventHandler

Type d'événement

EventHandler

Exemples

L’exemple de code suivant exécute une fusion lorsque vous cliquez sur le bouton de destination personnalisé. Cet exemple suppose que vous avez accès à un bouton de destination personnalisé. Cet exemple concerne un complément au niveau de l’application.

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

Remarques

Utilisez la ShowSendToCustom propriété pour créer un bouton personnalisé à la sixième étape de l’Assistant Fusion et publipostage.

S’applique à

Partager via