真怒了,做了个核弹文件出来消灭startup病毒

前段时间单位内不知道哪家伙中了个startup病毒,然后大家发报表的时候不停的交X感染.差不多都中了startup病毒.最后连我自己家里的电脑都中招了.网上那个清除startup的对已感染的文件无效.实在忍无可忍了,反正没人用宏来实现高级功能的--单位的那些人连打字都不怎么会的,于是我东抄抄西拼拼,做一个"核弹"来.这东西的功能就是删除硬盘上所有excel文件里的模块,窗体,控件.有杀错无放过.运行完后保证世界清净......

今天加上了手动的开关操作,以免误伤各位大侠.我的VBA功底很差,做出来的东西希望不要笑我.

excel1.jpg (131.07 KB)

2011-8-12 17:33

excel2.jpg (67.7 KB)

2011-8-12 17:33

附件

清除文件中的宏.rar(172.22 KB)

2011-8-12 17:33, 下载次数: 8

作者: laynet   发布时间: 2011-08-12

作者: 祝洪忠   发布时间: 2011-08-12

作者: swyrlbq   发布时间: 2011-08-12

作者: xtanuihazfh   发布时间: 2011-08-12

作者: xtanuihazfh   发布时间: 2011-08-12