Document.MailMergeWizardSendToCustom Evento
Definición
Importante
Parte de la información hace referencia a la versión preliminar del producto, que puede haberse modificado sustancialmente antes de lanzar la versión definitiva. Microsoft no otorga ninguna garantía, explícita o implícita, con respecto a la información proporcionada aquí.
Se produce cuando se hace clic en el botón personalizado en el paso seis del Asistente para combinar correspondencia.
public:
event EventHandler ^ MailMergeWizardSendToCustom;
event EventHandler MailMergeWizardSendToCustom;
member this.MailMergeWizardSendToCustom : EventHandler
Event MailMergeWizardSendToCustom As EventHandler
Tipo de evento
Ejemplos
En el ejemplo de código siguiente se ejecuta una combinación al hacer clic en el botón de destino personalizado. En este ejemplo se supone que tiene acceso a un botón de destino personalizado. Este ejemplo es para un complemento de nivel de aplicación.
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
Comentarios
Utilice la ShowSendToCustom propiedad para crear un botón personalizado en el sexto paso del Asistente para combinar correspondencia.