☰

控制名称导致我的宏崩溃

tag-icon • tag-icon microsoft-excel vba
控制名称导致我的宏崩溃

我有一系列宏，这些宏是为现场人员创建的。当他们完成文档并希望将其发送给相关人员时，我创建了一个 FINISH 宏。这基本上可以为他们清理文档，将文件大小从 2MB+ 降至约 50KB。宏（如下）基本上执行以下操作：

A.) 删除我在表单上放置的供他们在输入数据时使用的控制按钮。这些按钮是； 冻结数据- 将文档中的所有公式转换为静态文本 保存存档- 根据文档中单元格的内容为文件赋予唯一名称 结束- 对应于 FINISH 宏的按钮

B.) 删除带有下拉数据的选项卡。

当我尝试使用“完成”按钮运行宏时，我收到一条消息，提示“无法运行宏“评估格式 - 2.xlsm'Button11_Click'。该宏可能不在此工作簿中可用，或者所有宏可能已被禁用”

工作簿中的宏 但是，当我拉出宏列表时，它清楚地显示了宏是在该工作簿中。

Sub Finish()
Application.DisplayAlerts = False
'
' Finish Macro
' Finish Document For Sending out
'
'
    Sheets("DropDownData").Select
    ActiveWindow.SelectedSheets.Delete
    ActiveSheet.Shapes.Range(Array("Button 10")).Select
    Selection.Delete
    Selection.Cut
    ActiveSheet.Shapes.Range(Array("Button 11")).Select
    Selection.Delete
    Selection.Cut
    ActiveSheet.Shapes.Range(Array("Button 9")).Select
    Selection.Delete
    Selection.Cut
    Range("A6").Select
Application.DisplayAlerts = True
End Sub

有人能帮忙吗？

答案1

大家别担心，我找到了答案。我更改了文档的名称，但我分配给控制按钮的宏仍然与原始文档的名称相关。我意识到我可以从文档中的宏列表中运行宏，但不能从按钮本身运行宏。

相关内容