Compartilhar via


Evento Document.Undo (Publisher)

Ocorre quando um usuário desfaz a última ação realizada.

Sintaxe

expressão. Desfazer

Expressão Uma variável que representa um objeto Document .

Comentários

O evento Undo ocorre imediatamente após a ação ser desfeita.

Se várias ações forem desfeitas, o evento Undo ocorre apenas uma vez, após todas as ações serem desfeitas.

Para obter mais informações sobre como usar eventos com o objeto Document , consulte Usando eventos com o objeto Document.

Exemplo

Este exemplo exibe uma mensagem quando o usuário escolhe Desfazer na barra de ferramentas Standard ou seleciona Desfazer no menu Editar . Para que essa rotina funcione com a publicação atual, você deve colocá-la no módulo ThisDocument .

Private Sub DocPub_Undo() 
 MsgBox "Your last action has been reversed." 
End Sub

Para interceptar este evento a partir de um projeto que não seja do Microsoft Publisher, coloque o seguinte código na seção Declaração Geral do módulo e execute a rotina InitiatePubApp.

Private WithEvents DocPub As Publisher.Document 
 
Sub InitiatePubApp() 
 Set DocPub = Publisher.ActiveDocument 
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.