Gets or sets the name of a Visual Basic procedure that will run when the user clicks or changes the value of a CommandBarControl. Read/write.
Note
The use of CommandBars in some Microsoft Office applications has been superseded by the new Ribbon user interface. For more information, search help for the keyword "Ribbon."

Syntax

expression.OnAction

expression A variable that represents a CommandBarControl object.

Return Value
String

Remarks

The container application determines whether the value is a valid macro name.

Example

This example adds a command bar control to the command bar named "Custom". The procedure named MySub will run each time the control is clicked.

Visual Basic for Applications 
Set myBar = CommandBars("Custom") Set myControl = myBar.Controls _ .Add(Type:=msocontrolButton) With myControl .FaceId = 2 .OnAction = "MySub" End With myBar.Visible = True
This example adds a command bar control to the command bar named "Custom". The COM add-in named "FinanceAddIn" will run each time the control is clicked.
Visual Basic for Applications 
Set myBar = CommandBars("Custom") Set myControl = myBar.Controls _ .Add(Type:=msocontrolButton) With myControl .FaceId = 2 .OnAction = "!<FinanceAddIn>" End With myBar.Visible = True
ofv

See also: