打开任何一个EXCEL表格,就自动弹出名为startup的空白excel表格,并无法单独关闭,请问如何解决?

如题所述

新建一个空白的文档 工具—宏—宏安全性—选择“中”
之后 alt+f11打开vb编辑器 插入新模块后 把下面这段代码粘帖进去 保存后退出

打开刚才保存的文件 如果弹出安全提示 选择“启用宏”
就会自动运行并清除所有startup代码
-------------------------------开始复制--------------------------------
Sub Auto_Open()
Dim FS As Object
Dim BK As Workbook
Dim SHT As Worksheet
Dim ifExist As Boolean

On Error Resume Next
'判断是否存在StartUp,以ifExist标记
ifExist = False
If Dir(Application.StartupPath & "\" & "StartUp.xls") <> "" Then ifExist = True
If ifExist = False Then
For Each BK In Workbooks
If ifExist Then Exit For
For Each SHT In BK.Sheets
If ifExist Then Exit For
If BK.Sheets("StartUp").Name <> "StartUp" Then
ifExist = False
Else
ifExist = True
End If
Next SHT
Next BK
End If

'判断是否清除StartUp
If ifExist Then
If MsgBox("发现StartUp!" & vbCrLf & "StartUp可能影响你的Excel!是否清除?", vbOKCancel) = vbCancel Then Exit Sub
Else
MsgBox "未发现StartUp,自动退出"
ThisWorkbook.Close
Exit Sub
End If

'关闭StartUp.xls
Workbooks("StartUp.xls").Close False
'删除文件
Set FS = CreateObject("Scripting.FileSystemObject")
FS.DeleteFile Application.StartupPath & "\" & "StartUp.xls"
'删除宏模块StartUp
Application.DisplayAlerts = False
For Each BK In Workbooks
BK.Sheets("StartUp").Delete
Next BK
Application.DisplayAlerts = True
'恢复变量
Application.OnSheetActivate = ""
Application.OnKey "%{F11}"
Application.OnKey "%{F8}"
MsgBox "清除StartUp完毕,自动退出!"
ThisWorkbook.Close
End Sub
-----------------------------------------------复制结束--------------------------------------
温馨提示:内容为网友见解,仅供参考
第1个回答  2011-12-05
大概是启动时的模板设置成了STARTUP
第2个回答  2012-05-03
现象:打开excel文件时,会自动打开一份叫startup.xls的文件,
解决办法:关闭所有的excel文件后,删除c:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART\文件夹里面有个StartUp.xls.,如果没有效果,直接将xlstart文件夹给删了。应当说这并不是病毒,只是一些误操作引起的。
第3个回答  2012-11-27
一、删除
C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\Excel11.xls
,该文件删除后,Excel会自动重建的;

二、删除
C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART\StartUp.xls
第4个回答  2012-06-07
怎么弄好的,我也遇到这个问题了

打开任何一个EXCEL表格,就自动弹出名为startup的空白excel表格,并无法单...
'关闭StartUp.xls Workbooks("StartUp.xls").Close False '删除文件 Set FS = CreateObject("Scripting.FileSystemObject")FS.DeleteFile Application.StartupPath & "\\" & "StartUp.xls"'删除宏模块StartUp Application.DisplayAlerts = False For Each BK In Workbooks BK.Sheets("StartUp").Delete ...

EXCEL表格,就自动弹出名为startup的空白excel表格,并无法单独关闭,请问...
03:在那个空的工作簿上点窗体——隐藏,下次打开就没了。那个应该是个个人宏工作薄 07:在那个空的工作簿上视图——窗体——隐藏 还有。建议你下个宏专杀软件。

为什么我打开的每一个EXCEL表格都会弹出这么一个窗口不知道要如何办真心...
1和找到你安装OFFIC软件的文件夹目次在一个叫SYMINPUT.DLL的文件并把它给删了2和在你的临时文件下面找到一个叫做:StartUp的文件它一般在C盘的C:\\\\Documents and Settings\\\\用户名\\\\Application Data\\\\Microsoft\\\\Excel\\\\XLSTART 找到上面到的StartUp.xls文件把它删了3和如果照样不克不及解决的你在...

打开EXCEL表格时老是出现Startup是怎么回事
这是一个宏病毒。你必须得杀毒。 你可以百度搜一下这个宏病毒的清除方法。按说明处理。

如何解决Excel中出现的“startup.xls文件找不到”问题?
首先,进行宏病毒清除至关重要。在电脑中搜索xlstart文件夹,通常在"C:\\Documents and Settings\\用户名\\Application Data\\Microsoft\\excel\\XL Start",删除其中的所有文件,这些都是自启动文件,但可能携带着病毒。别忘了,还有隐藏的xlstart文件夹,也需仔细检查并清理。接着,打开并运行“宏病毒免疫工具4...

每次打开Excel,都会自动打开一个Book1
office 安装目录下 有个 startup 目录,如:C:\\Program Files (x86)\\Microsoft Office\\Office16\\STARTUP 打开这个目录,看看里面有没有文件,默认应该是空的。

打开excel2016表格会自动打开一个空表格
打开excel2016表格会自动打开一个空表格的解决步骤如下:1.打开一个工作表,这一步可以随便打开一个表格,不影响后面操作。然后点击左上角的“文件”选项卡。2.紧接着选择“选项”按钮。3.选择高级按钮,向下拖动右边的滚动条到接近最下面,出现的常规栏目中有一个“启动时打开此目录中的所有文件”项目...

打开excel表格时出现无法“startup.xls".请检查文件名的拼写,并检查文...
找到excel.exe程序,按住ctrl键,回车或双击执行excel,选择安全模式打开excel,如果安全模式运行没有问题,需要逐一排查excel启动加载的插件是否有问题

在xls中打开一个文件就自动弹出来这个starup.xls文件是为什么
现象:打开excel文件时,会自动打开一份叫startup.xls的文件,解决办法:关闭所有的excel文件后,删除c:\\Documents and Settings\\Administrator\\Application Data\\Microsoft\\Excel\\XLSTART\\文件夹里面有个StartUp.xls.,如果没有效果,直接将xlstart文件夹给删了。这个病毒重新安装office没有用的.感染上病毒的...

打开excel时会同时出现一个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\\...

相似回答