OnAction 属性

优质

小牛编辑

126浏览

2023-12-01

全部显示

返回或设置这样一个 Visual Basic 的过程名，该过程在用户单击或更改某命令栏控件的值时运行。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”添加一个命令栏控件。COM 加载项“FinanceAddIn”将在每次单击该控件时运行。

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