Share via

Undo Event [Publisher 2003 VBA Language Reference]

  • Article

Occurs when a user undoes the last action performed.

Private Subobject_Undo(**** )

object Required. A variable which references an object of type Document declared with events in a class module.

Remarks

The Undo event occurs immediately after the action is undone.

If multiple actions are undone, the Undo event only occurs once after all the actions are undone.

For more information about using events with the Document object, see Using Events with the Document Object .

Example

This example displays a message when the user clicks on the Undo button on the Standard toolbar or selects Undo from the Edit menu. For this routine to work with the current publication, you must put it in the ThisDocument module.

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

To trap this event from a non-Publisher project, you must place the following code in the General Declarations section of your module and run the InitiatePubApp routine.

Private WithEvents DocPub As Publisher.Document

Sub InitiatePubApp()
    Set DocPub = Publisher.ActiveDocument
End Sub

Applies to | Document Object