Sets the text of the Undo and the name of the procedure that’s run if you choose the Undo command (Edit menu) after running the procedure that sets this property.
expression.OnUndo(Text, Procedure)
expression Required. An expression that returns an Application object.
Text Required String. The text that appears with the Undo command (Edit menu).
Procedure Required String. The name of the procedure that’s run when you choose the Undo command (Edit menu).
Remarks
If a procedure doesn’t use the OnUndo method, the Undo command is disabled.
The procedure must use the OnRepeat and OnUndo methods last, to prevent the repeat and undo procedures from being overwritten by subsequent actions in the procedure.
Example
This example sets the repeat and undo procedures.
Application.OnRepeat "Repeat VB Procedure", _
"Book1.xls!My_Repeat_Sub"
Application.OnUndo "Undo VB Procedure", _
"Book1.xls!My_Undo_Sub"