Returns or sets the name of a macro that's run when the specified object is chosen. Read/write String.
Syntax
expression.OnAction
expression A variable that represents a Shape object.
Remarks
Setting this property for a menu item overrides any custom help information set up for the menu item with the information set up for the assigned macro.
Example
This example causes Microsoft Excel to run the ShapeClick procedure whenever shape one is chosen.
Worksheets(1).Shapes(1).OnAction = "ShapeClick"