怎么取消自动打开StartUp.xls的文件?

2024-11-19 12:29:00
推荐回答(2个)
回答1:

StartUp.xls宏病毒现象。

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程序会自建该文件。

第三步:新建\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

回答2:

StartUp.xls 宏病毒专杀&免疫工具
软件效果很完美!!!强烈推荐。
与网络上的工具区别:发现病毒有提示,直接打开EXCEl时,不会跳不出空白文档(book1)
软件请在“参考资料”链接下载。