【首发】'k4' 宏病毒专杀 原创新型excel宏病毒专杀工具

tao2581

近日公司大量excel发现一种office宏病毒，使用360 金山 等等均不能查杀，  下载金山版的宏病毒专杀 只杀了一部分，另一种类型的宏病毒无论如何也杀不掉。
发作症状如图：


搜索资料这种宏病毒称为k4宏病毒， 众多杀毒软件都无法查找可能在杀软看来这不是什么大毛病，进一步使用宏命令显示隐藏表可以看到如下代码：
在中了office宏病毒的excel文档 ctrl+f11 新建模块 输入以下代码：  再按 ctrl+f8 执行 显示隐藏表  即可看到隐藏的宏病毒

[vb] view plaincopyprint?

• 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  
  

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 CNameEnd Sub
显示宏内容如下：


单独删掉这个工作簿还不行，提示 找不到 #Ref!$A$2， 进一步发现中毒的工作簿使用了一个隐藏名称： Auto_avtivate  清楚即可；

根据以上原理，用vb6 制作了一个简单的专杀工具，只真的此中k4宏病毒 非常有效

office宏病毒专杀工具下载：

游客，如果您要查看本帖隐藏内容请回复

baige520

不错，下来试一下看看
- 本文出自阳光网驿--企业信息化专家，原文地址：http://bbs.sunwy.org/thread-149594-1-1.html

volvo1

很好                     。。。。。。。。。。。。。

hahayuer

我要杀毒啊。。。谢谢大师。。。。。。。。。。。。。。

wujin

支持一个。。看看有用

dingyi21

支持一个。。看看有用
.......................

dingyi21

支持一个。。看看有用
.....................................

gqdsc

你真厉害，这个病毒确实很讨厌，谢谢你这个工具

sdbzjy01

楼主真厉害，这个病毒确实很讨厌，谢谢你这个工具

yytt

不错，下来试一下看看

gmg-cs

最近excel 自动弹出检索，不知啥原因！

jim1987121

asdsadsadsadsadsadsadsadsawqdwqdwqdwqdwqd

whotop1

先收藏一下，等有用的时候再翻出来看看。