StartUp.xls宏病毒清除方法
第一步：清除C:\Documents
and Settings\administrator\Application
Data\Microsoft\Excel\XLSTART下的StartUp.xls；
第二步：清除C:\Documents
and Settings\administrator\Application
Data\Microsoft\Excel\的Excel11.exe(约236K)。（Excel程序会自建该文件）
第三步：新建C:\Documents
and Settings\administrator\Application
Data\Microsoft\Excel\XLSTART\startup.xls文件，输入以下代码（代码在图片下面）就行了，以后再打开带毒的excel文件就会自动清除excel文件自带的病毒宏代码。
（注意：其中有些事隐藏文件，你看不到，按照下面说的做就可以看到那些隐藏文件：打开我的电脑》》工具》》文件夹选项》》“隐藏受保护的操作系统文件（推荐）”前面的勾打掉》》选中“显示隐藏的文件、文件夹和驱动器”》》去掉“隐藏已知文件类型的扩展名”的勾。）
代码如下：
Sub auto_open()
On Error Resume
Next
Application.ScreenUpdating = False
ActiveWindow.Visible
= False
n$ =
ActiveWorkbook.Name
Workbooks(n$).Close
(False)
Application.OnSheetActivate = "StartUp.xls!cop"
End Sub
Sub cop()
On Error Resume
Next
Dim VBC As
Object
Dim Name As
String
Dim delComponent As
VBComponent
Name =
"StartUp"
For Each book In
Workbooks
Set delComponent =
book.VBProject.VBComponents(Name)
book.VBProject.VBComponents.Remove delComponent
Next
End Sub
标签：Excel,宏病毒,startup
