ExcelVBA自定义菜单和菜单栏

《ExcelVBA自定义菜单和菜单栏》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、Excel自定义菜单和菜单栏ExcelVBA自定义菜单和菜单栏(江羽收集整理)【目录】前言3一、简介3二、命令栏4三、控件常量4四、菜单栏64.1Add方法应用于CommandBars对象64.2返回命令栏控件的ID74.3确定活动菜单栏的名称74.4保存（内置或自定义菜单栏的）活动状态84.5创建自定义命令栏84.6显示自定义命令栏84.7删除自定义命令栏94.8隐藏命令栏94.9显示命令栏94.10还原内置命令栏9五、菜单105.1Add方法用于CommandBarControls对象105.2向命令栏添加自定义菜单控件115.3禁用命令栏上的菜单控件115

2、.4启用命令栏上的菜单控件115.5删除命令栏上的菜单控件125.6还原命令栏上的菜单控件12六、命令126.1向菜单控件添加分隔条136.2在菜单上创建自定义命令控件136.3在命令控件旁放置选中标记136.4禁用命令栏上的命令控件146.5启用命令栏上的命令控件146.6删除菜单上的命令控件156.7还原菜单上的内置命令控件15七、子菜单157.1添加子菜单167.2向子菜单添加命令167.3禁用子菜单上的命令控件16Excel自定义菜单和菜单栏7.4删除子菜单上的命令177.5禁用子菜单控件177.6删除子菜单控件17八、快捷菜单栏188.1新建快捷菜单栏

3、18九、快捷菜单199.1在快捷菜单栏上创建命令199.2禁用快捷菜单栏上的命令控件199.3删除快捷菜单栏上的命令209.4删除快捷菜单栏209.5还原内置快捷菜单栏上的命令20十、快捷菜单上的子菜单2010.1在快捷菜单栏上新建子菜单2110.2在快捷菜单栏的子菜单上创建命令控件2110.3禁用快捷菜单上的子菜单项控件2210.4删除快捷菜单上的子菜单项控件2210.5禁用快捷菜单上的子菜单控件2210.6删除快捷菜单上的子菜单控件23Excel自定义菜单和菜单栏前言在EXCEL中，我们的操作都是通过“工具栏、菜单栏、快捷菜”单实现。EXCEL通过菜单给我们

4、提供基本操作功能之外，也为我们提供了扩展自定义功能的接口，即自定义自己的工具栏、菜单栏。本文着重介绍如何在Excel2003版本中通过编程方式自定义菜单和菜单栏方法。其中包含Excel中管理和自定义菜单栏、菜单、命令、子菜单和快捷菜单，我将通过代码实例分步说明。与大家分享关于VBA实现菜单栏管理与自定义菜单栏功能的实现。一、简介在MicrosoftExcel2000以上版本中实现许与自定义菜单栏和菜单相关的常见任务，可以使用“自定义”对话框（见图1.1）。但如果要实现较高级任务或为自定义程序定制菜单栏和菜单，就需要创建MicrosoftVisualBasicfo

5、rApplications(VBA)代码。图1.1有关如何使用“自定义”对话框的更多信息，你可以单击“帮助”菜单上的“MicrosoftExcel自定义菜单和菜单栏Excel帮助”，在“Office助手”或“搜索向导”中键入自定义菜单栏，然后单击“搜索”查看主题。二、命令栏在MicrosoftOffice中，所有工具栏、菜单栏和快捷菜单都是被作为“命令栏”这样一种对象以编程方式控制的。下列所有项目在VBA中皆用CommandBar对象表示：l菜单栏、工具栏和快捷菜单。l菜单栏和工具栏上的菜单。l菜单、子菜单和快捷菜单上的子菜单。您可以修改任何内置的菜单栏和工具栏

6、，还可以创建和修改用您自己的VBA代码交付的自定义工具栏、菜单栏和快捷菜单。您可以将程序功能以单个按钮的形式放在工具栏上，或以命令名称组的形式放在菜单上。因为工具栏和菜单都是命令栏，所以可以使用同一类型的控件。在VBA和MicrosoftVisualBasic中，按钮和菜单项用CommandBarButton对象表示。显示菜单和子菜单的弹出控件用CommandBarPopup对象表示。在以下示例中，名为“Menu”的控件和名为“Submenu”的控件都是用于显示菜单和子菜单的弹出控件，并且这两个控件是各自的控件集中唯一的CommandBar对象。在Microso

7、ftExcel中，菜单栏和工具栏被视为是同一种可编程对象，即CommandBar对象。可以使用CommandBar对象中的控件来指代菜单、菜单项、子菜单和快捷菜单。可以在Type参数中使用一个常量为每个控件指定要用于菜单、子菜单或命令的控件类型。三、控件常量下面是Excel2003中的各种控件常量的列表，这些常量指定用于特定菜单栏控件的图形控件类型：•MsoControlActiveX*•MsoControlAutoCompleteCombo***•MsoControlButtonExcel自定义菜单和菜单栏•MsoControlButtonDropdown•M

8、soControlBut