Evento Application.MailMergeBeforeMerge (Publisher)

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

Sintaxe

mais simples. 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 de objeto Application , declare uma variável de objeto Application na seção General Declarations 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 Application 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.

  • Last updated on