通过

CommandBarControl.OnAction 属性 (Office)

  • 项目

获取或设置当用户单击或更改 CommandBarControl 的值时将运行的 Visual Basic 过程的名称。 读/写。

注意

某些 Microsoft Office 应用程序中对 CommandBars 的使用已由 Microsoft Office Fluent 用户界面的新功能区组件取代。 有关详细信息，请参阅 Office Fluent 功能区概述。

语法

表达式。OnAction

表达 一个代表 CommandBarControl 对象的变量。

返回值

String

备注

容器应用程序将确定该值是否是一个合法的宏名。

示例

本示例将命令栏控件添加到名为 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

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。