将activeX控件的命令button连接到一个模块

好吧，这是我的问题。 是否可以从Excel表单上的ActiveX控件命令button调用模块？

这是情景：我有一个名为菜单。 在菜单上，有10个activeX控制命令button。我需要命令button来调用或链接到一个模块。 关于如何实现这一点，我一点也不知道。 这甚至有可能吗？ 如果是这样，我该如何去做呢？ 如果不是，有没有其他的select？

非常感谢你。

Answer 1

1. 打开VB编辑器（ Alt + F11 ）
2. 在“项目浏览器”窗口中的“Microsoft Excel对象”下，右键单击button出现的表单，然后select“查看代码”

3. 在左上angular的下拉菜单中select相应的命令button

4. 这会将下面的代码添加到适当的工作表模块中

   Private Sub CommandButton21_Click() 'Your on click actions go here End Sub 

这意味着现在我们可以执行操作（例如，调用我们的子例程）

  Private Sub CommandButton21_Click() Call MyMacro End Sub 

现在， MyMacro可以存在于Click事件所在的工作表级代码中，也可以作为模块中的某个Public Sub存在。

更新

要显示一个用户窗体，使用Show方法使用用户窗体的名称。 默认名称是UserForm1 （或UserForm2或UserForm3等取决于您添加的数量）。

如果你想在点击时显示这个用户窗体，你可以使用下面的代码：

 Private Sub CommandButton21_Click() UserForm1.Show End Sub 

Answer 2

这很简单。 当您将活动控件添加到Excel工作表时，可以打开工作表的模块，然后在其中添加代码。

确保你添加一个activeXbutton不是一个excelbutton，因为这些是不同的东西。

您将需要function区上显示的“开发人员选项卡”（谷歌“添加开发人员选项卡到Excelfunction区”），让您插入控件和访问VBA编辑器。

你可以右键点击控制button并select“查看代码” – 这将创build点击事件。 您可以添加代码来调用任何现有的macros。 例如Call MyMacro1

请注意，在模块编辑器中，您可以使用顶部的combobox来select要添加的控件名称和事件types，以创build事件处理程序声明代码。 所以你可以从这里添加所有10个button的代码。

哈维