Excel - 附加到表单控制按钮的宏未激活

Question

我有一个奇怪的问题，一个命令按钮拒绝运行附加的宏。我收到消息“无法运行宏”。此工作簿中可能没有该宏，或者所有宏都可能被禁用。

我在新工作表上通过代码创建了三个按钮并分配了宏。前两个按钮可以正常工作，但第三个按钮不行。如果我将相同的宏重新分配给按钮（右键单击 - 分配宏）它可以正常工作，但这不会完成我需要的。

所有宏等都已启用。我希望有人能提供帮助，这让我很头疼！

    Sub AddButton()

    Dim ButtonName1, ButtonName2, ButtonName3 As String

    ActiveSheet.Buttons.Add(200, 5, 81, 36).Select
    ButtonName1 = Selection.Name
    Selection.OnAction = "CopyBack"
    ActiveSheet.Shapes(ButtonName1).TextFrame.Characters.Text = "Modify Scenario (Copy back)"

    ActiveSheet.Buttons.Add(285, 5, 81, 36).Select
    ButtonName2 = Selection.Name
    Selection.OnAction = "GotoPlanner"
    ActiveSheet.Shapes(ButtonName2).TextFrame.Characters.Text = "Return To Shift Planner"

    ActiveSheet.Buttons.Add(370, 5, 81, 36).Select
    ButtonName3 = Selection.Name
    Selection.OnAction = "DellCurrSheet"
    ActiveSheet.Shapes(ButtonName3).TextFrame.Characters.Text = "Delete This Scenario"

    ActiveSheet.Range("A1").Select

    End Sub

Answer 1

抱歉，如果我在此问题上浪费了任何人的时间，但我已经确定了导致宏名称分配问题的错字。