打开要解决问题的工作表,按Alt+F11打开VB编辑器,在“视图”下选择“工程资源管理器”,打开后双击”ThisWorkbook”,在右边的编辑页面复制下面的代码
Sub HideMacroSheet()
ThisWorkbook.Sheets("macro1").Visible = 1
End Sub '(显示隐藏的宏表macro1)
Sub DisplayNames()
Dim Na As Name
For Each Na In ThisWorkbook.Names
Na.Visible = True
Next
End Sub '(显示隐藏的“Auto_Activate”)
然后点击“运行”下面的“运行子过程/用户窗体”,或按F5,弹出宏对话框,选择:“T hisWorkbook. HideMacroSheet”,然后再点“运行”,此时就可以在工作表中看到表Macro1显示出来。然后再点击“运行”下面的“运行子过程/用户窗体”,或按F5,弹出宏对话框,选择:“T hisWorkbook. DisplayNames”,然后再点“运行”,此时就可以在表Macro1的A2看到“Auto_Activate”,点击“名称管理器”(Ctrl+F3),里面有很多定义的名称,把含有Auto_Activate
的全部删掉就可以了。
转载于:https://blog.51cto.com/guohongzhi521/1176861