Evento Application.MailMergeAfterMerge (Publisher)

Ocorre depois que todos os registros de uma mala direta são mesclados com sucesso.

Sintaxe

expressão. MailMergeAfterMerge (Doc)

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.

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 informando que todos os registros no documento especificado concluíram a mesclagem.

Private Sub MailMergeApp_MailMergeAfterMerge(ByVal Doc As Document) 
 
 MsgBox "Your mail merge on " & _ 
 ActiveDocument.Name & " is now finished." 
 
End Sub

Para que este evento ocorra, você precisa colocar a seguinte linha de código na seção Declaração Geral do módulo e executar a seguinte rotina de inicialização.

Private WithEvents MailMergeApp As Application 
 
Sub InitializeMailMergeApp() 
 Set MailMergeApp = Publisher.Application 
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.