资源描述：
《删除“无法禁用的宏”.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、个人收集整理勿做商业用途删除“无法禁用的宏”这是上次遇到MＳExcｅl．TｏＤolｅ宏病毒的后续，不知道为什么有的excｅl文档在经过专杀处理后,病毒模块已经删除了,但是在打开文档时仍然提示“该工作簿中包含一种无法禁用的宏（Mｉcｒoｓofｔ Eｘｃel4.0版的宏)”,一定要启用宏后才能打开,而在文档里却找不到任何宏,VBA编辑器里也没有多余的代码，也再查不出任何病毒,在C:Pｒｏgram Fiｌｅs＼ＭicrosoｆtOfｆiceOＦFＩCE11XLSＴART和C:＼Dｏｃumｅnｔs
2、 aｎdSeｔtｉnｇsＡｄministｒatorApplicatｉｏnＤataＭicroｓoftExcelXＬSTＡＲＴ下也没有任何可疑的启动文件。再次查对病毒的代码,原来还有一个隐藏的宏表存在，只是一度相信专杀工具的能力，认为它已经清除病毒了,没想到竟然还有遗留(也有可能是因为该文档加过密吧）。要显示隐藏的宏表,先从工具－宏－Visuａｌ Ｂasic编辑器,右键点击任一工作表（就是sheｅt那些),点击“查看代码”，把下面代码粘贴到代码窗口：Suｂ tｅsｔ()ＤimshＡsWor
3、kｓheｅtFoｒＥaｃhshＩnＥxceｌ4MacroSｈｅeｔsＩfNot sh．Visible Tｈeｎsh.Visibｌe =1ﻫＮｅxtﻫＥｎdSｕｂ将光标定位到代码段内,按F５运行。然后回到工作表的界面(Vｉsｕal Basic编辑器可以关掉了，上面输入的代码也可以删除,不需要了），就可以看到被隐藏的工作表（注意，通过VBA代码隐藏的工作表是不能通过菜单中的“格式”-工作表-“取消隐藏”来解除隐藏状态的）,在我这里出现的原先隐藏工作表是Mａcro1（如下图）,这是一个保护宏的机制,如
4、果禁用宏将不能打开excｅl文档，被病毒利用来保护自己。删除此工作表,但事情并没有结束,然后切换到该excｅｌ工作簿其它每一个正常的工作表时就会出现“找不到#ＲEＦ！＄A＄2”，虽然不影响具体操作,但很烦人，原来这个病毒为每个表都添加工作表级别的名称“Aｕｔｏ_Aｃｔｉvaｔe”，并将引用都指向宏表“Macrｏ１”的A2单元格,“Aｕtｏ_Acｔｉvate”是一个自动宏,表被激活时自动执行，（病毒代码： wb.Ｎaｍes．Add sht.Ｎａme &"！Ａｕto_Activate＂, ＂=Mac
5、rｏ1!＄A＄2",Ｆalsｅ.....．),而且这个工作表级别的名称是隐藏的，所以想在菜单中的“插入”－“名称”-“定义”中发现它是不可能的。不过虽然是隐藏的,但删除还是可以的，进入“插入”－个人收集整理勿做商业用途“名称”－“定义”,在最上面的框中输入要删除的名称,如本例中的Auto＿Activate,然后点击删除,就把这个隐藏的工作表级别名称删除掉了,整个exceｌ工作簿中所有的工作表都要这样删除一遍，这样才能把这个引用宏的影响彻底消除。顺便说一下,如果打开ｅxcel文档出现找不到宏的提示
6、，也可以到这里来查查看是否有什么名称要删除。最后，保存excｅl，再次打开就不会出现“无法禁用宏”的提示了，当然这个excel文档本身原来就没有宏的。关于显示隐藏的宏表可参考:1、http:／／clｕb.excｅｌhomｅ.net/ｔhrｅａd-２９４584－1-1.ｈtml ２、http：//club.exｃelhomｅ.ｎeｔ/thｒｅａd-1９８4６0-1-93.hｔml关于保护宏可参考：1、ｈｔtp：／/bｌｏｇ.163．ｃoｍ/a_teaｃher/ｂｌog/ｓｔatic/417212５
7、420111199171660１/2、httｐ://blog.ｃsdn.net／ｃzmao1985/ａrｔｉcle/details/59697１0(可以批量进行删除定义名称。先从工具-宏－VｉsualＢaｓic编辑器,右键点击任一工作表（就是sｈeet那些)，点击“查看代码”，把下面代码粘贴到代码窗口:SｕbDｅlName（) Diｍ ooAｓＮａmeﻫ ＯnErrorResumeNexｔ FｏｒＥacｈoｏ Ｉn ThisWoｒkbook.Nａmeｓ ｏo.Deｌｅtｅ
8、ﻫ NexｔﻫEnｄ Sｕb可以录制一个新宏,然后编辑它,删除原来的代码,改为上述代码保存就可以了．然后运行一下宏）
