主题：[求助]服务器出现意外情况

你执行什么代码后出现的错误？贴出来看看。

调出你任务管理器，把所有的excel进程都结束后，再测试代码。

如果还是不行，加入msgbox，定位是哪句代码出错导致的错误。

代码不应该有问题，实例发上来测试。

如果不能发实例，你删减代码（把代码精简到最简），看哪里开始报错。

那就试试改成这样

wb = app.WorkBooks.Open(fl)  

那没办法了。如果你修改后可以，那就好。不然，就做个实例发出来测试一下。