删除Excel宏病毒删除清除exc.doc

文档介绍：删除Excel宏病毒
方法一:通过去掉宏自动运行方式删除。
1、不要打开任何Excel文件。
2、新建一个文本文档,重命名为Book1,扩展名删掉。
3、找到这个文件夹:C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART,如果里面有一个Book1文件,替换它。
4、然后打开染毒的Excel文件, 新建一个表,将内容复制到这个新表中。
方法二:通过程序代码方式删除。
,进入其宏编辑器(Alt+F11),在ThisWorkbook中加入以下代码:
Private Sub Workbook_Open()
Dim WorkbookInfected As Boolean
Dim ad As Object
Dim strVirusName As String
Dim ponentNo As Integer
Dim i As Integer
'下面两句为病毒感染标记及病毒名因为要扫描自己,用"&"连接字符串可以避免误判自己
'代码重用时,针对不同的病毒可修改以下两句
Const Marker = "<- this is another" & " marker!"
strVirusName = "Marker"
While (1)
'If语句部分判断是否检查到自己,如果只剩下自己,则退出程序
If = Then

If = Then GoTo EndRun
End If
'可能存在VB宏代码处的数目
ponentNo =
For i = 1 To ponentNo
Set ad = (i)
'是否包含特征字符串
WorkbookInfected = (
Marker, 1, 1, 10000, 10000)
'如果包含特征字符串,则进行去毒处理 If WorkbookInfected = True