我可以试试。如果方便的话，把包含代码的文件发到hsworking@qq.com，白天有时间的时候帮你看看
你写成 Application.Activeworkbook.save就可以保存的。ThisWorkbook.Save 的作用跟 Application.Activeworkbook.save 是不同的。
