EXCELVBA应用教程-菜单程序设计.doc

在Excel VBA中，菜单程序设计是创建用户友好的交互界面的关键部分，使得用户能够通过自定义菜单轻松访问和执行特定功能。本教程主要涵盖了两个方面：独立菜单的设计和在Excel已有菜单上增加菜单。 我们来详细讲解独立菜单的设计： 1. 建立菜单： 在VBA中，当工作簿打开时，可以通过`Workbook_Open`事件来添加自定义菜单。使用`MenuBars("MyMenu").Delete`删除已存在的自定义菜单，避免重复创建。接着，使用`MenuBars.Add("MyMenu")`创建一个名为"MyMenu"的新菜单栏。然后，可以使用`.Menus.Add`方法为菜单栏添加菜单项，并使用`.MenuItems.Add`添加子菜单项，同时指定其标题和关联的VBA子程序（如`OnAction:="变动项目初始化"`）。 例如，创建一个名为“项目初始”的菜单，包含“变动项目初始化”，“其他项目初始化”和“退出”三个子菜单项，分别调用对应的VBA子程序。 2. 子程序的编制： 对于每个菜单项，都需要编写相应的子程序来处理用户的选择。例如，退出菜单项关联的子程序`退出`会删除自定义菜单并关闭Excel应用程序。 接下来，我们讨论如何在Excel原有的菜单上增加菜单： 12.2 在Excel上增加菜单的设计： 如果需要在Excel现有的菜单上添加功能，可以利用`CommandBars`对象。这里以在"编辑"菜单下添加一个名为"显示窗口"的新按钮为例。通过`Application.CommandBars(1).Controls(2)`获取到"编辑"菜单，然后添加一个新的控件（msoControlButton），设置其标题和点击时执行的子程序（`OnAction = "FormShow"`）。 这种做法允许用户在Excel的标准菜单结构中找到自定义功能，增加了系统的集成感。 需要注意的是，所有关联的VBA子程序（如`FormShow`）需要在适当的地方定义，通常是在VBA工程中的模块中，以便在用户点击菜单项时执行相应的操作。 总结来说，Excel VBA的菜单程序设计提供了一种定制工作环境的方法，使得用户可以更直观地访问和执行自定义功能。通过创建独立的菜单或在现有菜单上添加新元素，开发者可以根据实际需求构建功能丰富的Excel应用。同时，每个菜单项都需与相应的VBA子程序相联接，以实现用户交互时的功能执行。通过熟练掌握这些技巧，可以极大地提升Excel应用的用户体验和效率。