大家好,我是小新,我来为大家解答以上问题。startuprepairoffline怎么处理,startup xls很多人还不知道,现在让我们一起来看看吧!
StartUp.xls宏病毒清除方法
第一步:清除C:Documents and SettingsadministratorApplication DataMicrosoftExcelXLSTART下的StartUp.xls;
第二步:清除C:Documents and SettingsadministratorApplication DataMicrosoftExcel的Excel11.exe(约236K),Excel程序会自建该文件。
第三步:新建Documents and SettingsadministratorApplication DataMicrosoftExcelXLSTARTstartup.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
本文到此讲解完毕了,希望对大家有帮助。