VBA专题10-18：使用VBA操控Excel界面之在功能区中添加自定义菜单控件

excelperfect

这是本系列文章讲解的最后一种在功能区中添加的自定义控件类型，也是用于组织多个命令的一种非常有用的控件——菜单控件。

添加该控件的步骤与前面文章介绍的相同，新建一个启用宏的工作簿并保存，关闭该工作簿，然后在CustomUI Editor中打开该工作簿，输入下面的XML代码：

在Excel中打开该工作簿，然后打开VBE，插入一个标准的VBA模块，输入下面的代码：

'Callback for button1 onActionSub Macro1(control As IRibbonControl) MsgBox '单击了Button1'End Sub 'Callback for button2 onActionSub Macro2(control As IRibbonControl) MsgBox '单击了Button2'End Sub 'Callback for button3 onActionSub Macro3(control As IRibbonControl) MsgBox '单击了Button3'End Sub 'Callback for button4a onActionSub Macro4A(control As IRibbonControl) MsgBox '单击了Button4A'End Sub 'Callback for button4b onActionSub Macro4B(control As IRibbonControl) MsgBox '单击了Button4B'End Sub 'Callback for button5 onActionSub Macro5(control As IRibbonControl) MsgBox '单击了Button5'End Sub

此时，在工作簿的自定义选项卡中的菜单控件如下图所示：

注意，本例只是演示了使用XML在菜单控件中添加按钮和菜单控件，也可以添加其他类型的控件，例如切换按钮、拆分按钮、库、复选框、通用控件和动态菜单。在后面的文章中我们会详细介绍添加动态菜单这类特殊的控件。

下图演示了在自定义选项卡中添加的菜单控件的效果：

说明：本专题系列大部分内容学习整理自《Dissect and Learn Excel VBA in 24 Hours：Changing workbook appearance》，仅供学习研究。注：如果你有兴趣，你可以到知识星球App的完美Excel社群下载这本书的完整中文版电子书。