ecel找不到macro1$A$2的解决方法.docxVIP

的解决方法excel 找不到 macro1$A$2 的解决方法 在打开 excel 表格的时候，是不是总是弹出“找不到 macro1$A$2” 的对话框呢，下面的办法可以轻松的帮你解决掉问题哦 方法一： 打开要解决问题的工作表，按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. HideMacroShee”t ，然后再点“运行”，此时就可以在工作表中看到表Macro1 显示出来。然后再点击“运行” 下面的“运行子过程/用户窗体”，或按F5，弹出宏对话框，选择：“T hisWorkbook. DisplayNames”，然后再点“运行”，此时就可以在表 Macro1 的 A2 看到“Auto_Activate”，点击“名称管理器”，里面有很多定义的名称，把含有Auto_Activate 的全部删掉就可以了。方法二： 关闭有问题的表，新建一个表，按Alt+F11 打开 VB 编辑器，“视图”下选择“工程资源管理器”，然后点击“插入”，插入模块，在右边的编辑区域复制下面的代码： Sub RmvMacros() Dim Dim wbk As strFilename As Workbook String strFilename = Application.GetOpenFilename(Excel 文 件(*.xls;*.xlsx),*.xls;*.xlsx) 要 删 除 宏 的 文 件 名If strFilename = False Then Exit Sub Application.EnableEvents = False 禁止在打开时触发事件 Application.DisplayAlerts = False Set For wbk Each = sht Workbooks.Open(strFilename) In wbk.Sheets sht.Visible = True If sht.Type = 3 Or sht.Type = 4 Then sht.Delete Next For i = wbk.Names.Count To 1 Step -1 If wbk.Names(i).Visible = False Then wbk.Names(i).Delete Next wbk.Close Application.DisplayAlerts = Application.EnableEvents = end sub i savechanges:=True True True 鼠标点击，并选中左侧 VBAProject（打开表格的名字），然后再点击 “运行”，选择“运行宏” ，在弹出的对话框中，选中你要解决问题的表，就 ok 了，再打开你的表，就会发现之前的问题都解决了。