Evento Application.MailMergeBeforeMerge (Publisher)

Ocorre quando uma mesclagem é executada antes que quaisquer registros em uma mala direta tenham sido mesclados.

Sintaxe

expressão. MailMergeBeforeMerge (Doc, StartRecord, EndRecord, Cancel)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Doc	Obrigatório	Document	O documento principal de mala direta.
StartRecord	Obrigatório	Long	O primeiro registro da fonte de dados a ser incluído na mala direta.
EndRecord	Obrigatório	Long	O último registro na fonte de dados a ser incluído na mala direta.
Cancel	Obrigatório	Boolean	Interrompe o processo de mala direta antes de iniciar.

Comentários

Para acessar os eventos do objeto Application , declare uma variável de objeto Application na seção Declarações Gerais de um módulo de código e defina a variável igual ao objeto Application para o qual você deseja acessar eventos.

Para obter informações sobre como usar eventos com o objeto Aplicativo do Microsoft Publisher, consulte Usando eventos com o objeto Application.

Exemplo

Este exemplo exibe uma mensagem antes de se iniciar o processo de mala direta, perguntando ao usuário se ele deseja continuar. Se o usuário escolher Não, o processo de mesclagem será cancelado.

Private Sub MailMergeApp_MailMergeBeforeMerge(ByVal Doc As Document, _ 
 ByVal StartRecord As Long, ByVal EndRecord As Long, _ 
 Cancel As Boolean) 
 
 Dim intVBAnswer As Integer 
 
 Set Doc = ActiveDocument 
 
 '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, "Event!") 
 
 'If user's response to question is No, then cancel 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.