我有一系列宏,我已经为我的现场人员创建了一个表单。当他们完成文档并希望将其发送给相应的人员时,我创建了一个FINISH宏。这基本上为他们清理文档,将文件大小从2MB +下降到大约50KB +宏(下面)基本上执行以下操作:
A.)删除我在表单上输入的控制按钮,供他们输入数据时使用。这些按钮是; 冻结数据 - 将文档中的所有公式转换为静态文本 保存文件 - 根据文档上单元格的内容为文件提供唯一名称 .FINISH - 与FINISH宏对应的按钮
B.)删除带有下拉数据的选项卡。
当我尝试使用FINISH按钮运行宏时,我收到一条消息“无法运行宏”评估格式 - 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
有人能帮忙吗?