excel - 当我打开工作簿时，Workbook_Open 子程序不会运行？

Question

该程序应该创建一个按钮，用户可以按下该按钮来激活不同的子程序。从我的在线搜索来看，打开工作簿时似乎应该激活下面的子项，但事实并非如此？

我做错了什么？

Option Explicit
Private Sub Workbook_Open()
Dim btn As Button
Dim rng As Range
With Worksheets("Sheet1")
    Set rng = .Range("B2:C2")
        Set btn = .Buttons.Add(rng.Left, rng.Top, rng.Width, rng.Height)
    With btn
        .Caption = "To begin the program, please click this button"
        .AutoSize = True
        .OnAction = "TableCreation1"
    End With
End With
End Sub

Answer 1

确保您的 Private Sub Workbook_Open() 子例程粘贴在此工作簿对象内，而不是在模块、表单或工作表对象中。