Evento Application.MailMergeAfterMerge (Word)
Ocorre depois que todos os registros de uma mala direta são mesclados com sucesso.
Sintaxe
expressão. MailMergeAfterMerge (Doc, DocResult)
expressão Uma variável que representa um Aplicativo objeto.
Para obter informações sobre como usar eventos com o objeto Application , consulte Usando eventos com o objeto Application.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Doc | Obrigatório | Document | O documento principal de mala direta. |
| DocResult | Obrigatório | Document | O documento criado a partir da mala direta |
Exemplo
Este exemplo exibe uma mensagem afirmando que todos os registros do documento especificado tiveram sua mesclagem concluída. Se o documento tiver sido mesclado a um segundo documento, a mensagem incluirá o nome do novo documento. Este exemplo pressupõe que você declarou uma variável do aplicativo chamada MailMergeApp nas declarações gerais e definiu a variável com um valor igual ao do objeto Application do Word.
Private Sub MailMergeApp_MailMergeAfterMerge(ByVal Doc As Document, _
ByVal DocResult As Document)
If DocResult Is Nothing Then
MsgBox "Your mail merge on " & _
Doc.Name & " is now finished."
Else
MsgBox "Your mail merge on " & _
Doc.Name & " is now finished and " & _
DocResult.Name & " has been created."
End If
End Sub
Confira também
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.