同事电脑突然出现有些xls文件打开不显示,工具栏不能操作,也不报错。
在网上查了一下,最后找到解决方法,特此记录一下:
调出vba编辑器,新建模块,写入一下代码:
sub showexcel()
on error resume next
for each xlswindow in Application.Window
xlswindow.Visible=True
next
end sub
同事电脑突然出现有些xls文件打开不显示,工具栏不能操作,也不报错。
在网上查了一下,最后找到解决方法,特此记录一下:
调出vba编辑器,新建模块,写入一下代码:
sub showexcel()
on error resume next
for each xlswindow in Application.Window
xlswindow.Visible=True
next
end sub