Office) (CommandBarControl.OnAction 屬性

取得或設定當使用者按一下或變更的 CommandBarControl 值將會執行 Visual Basic 程序名稱。 可讀寫。

注意事項

[!注意事項] CommandBars 用於部分的 Microsoft Office 應用程式已經由 Microsoft Office Fluent 使用者介面的新功能區元件取代。 如需詳細資訊，請參閱 Office Fluent 功能區概觀。

語法

運算式。OnAction

表達 代表 CommandBarControl 物件的 變數。

傳回值

字串

註解

這個容器應用程式會判斷該值是否為有效的巨集名稱。

範例

本範例會將命令列控制項新增至名為 Custom的命令列。 名為 MySub 程序會執行每次按一下控制項。

Set myBar = CommandBars("Custom") 
Set myControl = myBar.Controls _ 
    .Add(Type:=msocontrolButton) 
With myControl 
    .FaceId = 2 
    .OnAction = "MySub" 
End With 
myBar.Visible = True

本範例會將命令列控制項新增至名為 Custom的命令列。 每次按一下控制項時，都會執行名為 FinanceAddIn 的 COM 增益集。

Set myBar = CommandBars("Custom") 
Set myControl = myBar.Controls _ 
    .Add(Type:=msocontrolButton) 
With myControl 
    .FaceId = 2 
    .OnAction = "!<FinanceAddIn>" 
End With 
myBar.Visible = True

另請參閱

• CommandBarControl 物件成員

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。