Compartilhar via


Evento Application.MailMergeWizardStateChange (Word)

Ocorre quando um usuário passa de uma etapa para uma etapa especificada no Assistente de mala direta.

Sintaxe

expressão. MailMergeWizardStateChange (Doc, FromState, ToState, Handled)

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.
FromState Obrigatório Long A etapa do Assistente de mala direta a partir da qual o usuário está se movendo.
ToState Obrigatório Long A etapa do Assistente de mala direta para a qual o usuário está se movendo.
Handled Obrigatório Boolean True move o usuário para a próxima etapa. False para o usuário permaneça na etapa atual.

Exemplo

Este exemplo exibe uma mensagem quando o usuário passa da etapa três do Assistente de mala direta para a etapa quatro. Baseado na resposta à mensagem, o usuário passará à etapa quatro ou permanecerá na etapa três. O 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_MailMergeWizardStateChange(ByVal Doc As Document, _ 
 FromState As Long, ToState As Long, Handled As Boolean) 
 
 Dim intVBAnswer As Integer 
 FromState = 3 
 ToState = 4 
 
 'Display a message when moving from step three to step four 
 intVBAnswer = MsgBox("Have you selected all of your recipients?", _ 
 vbYesNo, "Wizard State Event!") 
 
 If intVBAnswer = vbYes Then 
 'Continue on to step four 
 Handled = True 
 Else 
 'Return to step three 
 MsgBox "Please select all recipients to whom " & _ 
 "you want to send this letter." 
 Handled = False 
 End If 
 
End Sub

Confira também

Objeto de Aplicativo

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.