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.