如何删除宏病毒一、
首先把宏安全性设置非常高,防止以后再感染。
再删除C:\Documents and Settings\administrator\Application Data\Microsoft\Excel\XLSTART下的StartUp.xls;
删除C:\Documents and Settings\administrator\Application Data\Microsoft\Excel\的Excel11.exe。
然后先手工清除excel文件自带的宏病毒;
①当打开的Excel有如上提示的中毒征状时,点击“工...
一、
首先把宏安全性设置非常高,防止以后再感染。
再删除C:\Documents and Settings\administrator\Application Data\Microsoft\Excel\XLSTART下的StartUp.xls;
删除C:\Documents and Settings\administrator\Application Data\Microsoft\Excel\的Excel11.exe。
然后先手工清除excel文件自带的宏病毒;
①当打开的Excel有如上提示的中毒征状时,点击“工具”→“宏”→“Visual Basic编辑器(V)”。
②在模块“StartUp”的上面点击右键,再点“移除StartUp(R)”,再点击“否”(如果显示的是一片空白,可到“视图”里面点“工程资源管理器”);
③在模块“StartUp”的上面点击右键,再点“移除StartUp(R)”;
二、
近日公司大量excel发现一种office宏病毒,使用360 金山 等等均不能查杀, 下载金山版的宏病毒专杀 只杀了一部分,另一种类型的宏病毒无论如何也杀不掉。
发作症状如图:
搜索资料这种宏病毒称为k4宏病毒, 众多杀毒软件都无法查找可能在杀软看来这不是什么大毛病,进一步使用宏命令显示隐藏表可以看到如下代码:
在中了office宏病毒的excel文档 ctrl+f11 新建模块 输入以下代码: 再按 ctrl+f8 执行 显示隐藏表 即可看到隐藏的宏病毒
Sub 显示隐藏的表()
Dim i As Integer
Dim CName As Name
'将所有隐藏表显示
For i = 1 To Sheets.Count
Sheets(i).Visible = True
Next
'查找隐藏的名称
For Each CName In Workbooks("book1.xls").Names
MsgBox CName.Name
Next CName
End Sub
显示宏内容如下:
单独删掉这个工作簿还不行,提示 找不到 #Ref!$A$2, 进一步发现中毒的工作簿使用了一个隐藏名称: Auto_avtivate 清除即可;
三、弹出 找不到#REF!$A$2,何解?
解决这个问题很简单,复制,选择性粘贴即可。比较感兴趣的是出现这个错误的原因?如何撤销这个引用?这个表是中了宏病毒后,删除宏表后出现的问题。应该引用的是宏表中的数据。
这是因为 有些工作表和名称已经被隐藏了。
第一,使用宏命令将二者显示出来,
Sub test()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
sh.Visible = xlSheetVisible
Next
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Visible = True
Next
End Sub
第二,然后将多余的Marco的sheet删除。
第三,按 ctrl+F3 显示名称管理器,将其中的所有名称删除。 搞定!!!
三、修改EXCEL的安全性为高,重新打开后还是低,因为病毒修改了注册表
此方法只使用于2003
打开注册表“\HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\OFFICE\11.0\EXCEL\security”中的"Level",修改宏安全级别的,1低,2 中,3高
本文档为【如何删除宏病毒】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑,
图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。