让我的按钮打招呼

Question

我正在尝试使用VBA for Excel并将“开发人员”标签添加到功能区。我还在Module1中添加了一个小子：

Sub Hello()

    MsgBox ("Hello world!")

End Sub

然后我在电子表格1中创建了一个按钮，右键单击并分配Hello作为它的宏。

到目前为止，我认为这应该可行，但是当我点击它时没有任何反应。

此外，如果再次打开VBA编辑器窗口，Module1已被编辑，还不包含我的操作？

Sub Hello()

    MsgBox ("Hello world!")

End Sub
    ActiveSheet.Shapes.Range(Array("Button 2")).Select
    Selection.OnAction = "Hello"
    Range("G15").Select
    ActiveSheet.Shapes.Range(Array("Button 2")).Select
    Application.Goto Reference:="Hello"

这个mambo jambo是什么？为什么按钮不起作用？ ：（

Answer 1

尝试没有parantheses的messagebox，只测试引号。所以：msgbox“Blabla” 在子例程之后删除代码：它是由宏录制器意外生成的（没有目的）。

Answer 2

 Private Sub CommandButton1_Click()    
   Call hello  
 End Sub

1. 删除End Sub以下的所有内容....这可能已记录在某处
2. 右键单击按钮并转到“查看代码”并调整自动代码，如上所示。选择按钮时，您需要进入“设计模式”才能获得菜单：