Sets the Repeat menu item and the name of the procedure that will run if you choose the Repeat command (Edit menu) after running the procedure that sets this property.
expression.OnRepeat(Text, Procedure)
expression Required. An expression that returns an Application object.
Text Required String. The text that appears with the Repeat command (Edit menu).
Procedure Required String. The name of the procedure that will be run when you choose the Repeat command (Edit menu).
Remarks
If a procedure doesn’t use the OnRepeat method, the Repeat command repeats procedure that was run most recently.
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"