Evento Application.MailMergeBeforeMerge (Word)

Artículo
04/07/2023

Este evento se produce antes de combinar registros durante una combinación de correspondencia.

Sintaxis

expresión. MailMergeBeforeMerge (Doc, StartRecord, EndRecord, Cancel)

expresión Variable que representa un objeto Application.

Para obtener información sobre el uso de eventos con el objeto Application , consulte Uso de eventos con el objeto Application.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Doc	Obligatorio	Document	Documento principal de la combinación de correspondencia.
StartRecord	Obligatorio	Long	Primer registro del origen de datos que se incluye en la combinación de correspondencia.
EndRecord	Obligatorio	Long	Último registro del origen de datos que se va a incluir en la combinación de correspondencia.
Cancel	Obligatorio	Boolean	True detiene el proceso de combinación de correspondencia antes de que se inicie.

Ejemplo:

En este ejemplo, se muestra un mensaje antes de que se inicie el proceso de combinación de correspondencia donde se pregunta al usuario si desea continuar. Si el usuario hace clic en No, el proceso de combinación se cancela. En este ejemplo, se supone que se ha declarado una variable de aplicación denominada MailMergeApp en las declaraciones generales y que se ha establecido la variable igual al objeto Application de Microsoft Word.

Private Sub MailMergeApp_MailMergeBeforeMerge(ByVal Doc As Document, _ 
 ByVal StartRecord As Long, ByVal EndRecord As Long, _ 
 Cancel As Boolean) 
 
 Dim intVBAnswer As Integer 
 
 'Request whether the user wants to continue with the merge 
 intVBAnswer = MsgBox("Mail Merge for " & _ 
 Doc.Name & " is now starting. " & _ 
 "Do you want to continue?", vbYesNo, "MailMergeBeforeMerge Event") 
 
 'If users response to question is No, cancel the merge process 
 'and deliver a message to the user stating the merge is canceled 
 If intVBAnswer = vbNo Then 
 Cancel = True 
 MsgBox "You have canceled mail merge for " & _ 
 Doc.Name & "." 
 End If 
 
End Sub

Vea también

Objeto Application

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.