用Excel vba编程，怎样实现退出时后台自动保存，不显示是否保存对话框，各位大侠，帮帮忙啊！

 我来答

1个回答

匿名用户
2014-07-11

展开全部

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.DisplayAlerts = False
    ThisWorkbook.Save
    Application.DisplayAlerts = True
End Sub

更多追问追答
追问

哈哈，好了，非常感谢！但是保存特别慢呢，难以忍受的慢，前面通过单击单击是也是这样。
追答

保存慢是因为文件太大了或者电脑硬盘速度慢
追问

30多兆

电脑没有问题吧
追答

是文件大的原因。如果不是从数据库导出的纯数据，可能你的表格包含太多的对象（如连接线、文本框、图片之类），或者有很多空单元格设置了格式（此问题在.xls 格式中存在）
追问

就是，原来还可以后来加载了登录界面（含一张图片）以后就开始变慢了，但是改成2007格式就好多了，文件也小了一半，只有15兆了

还有一个问题不知道你遇到过没有，运行2003没有问题，但改成2007以后就经常出现非法退出的情况，并提示你发送不发送错误报告，然后就是漫长的恢复过程，回复后原来所做的编辑都丢失了，这个问题已经困扰我好多年了，问了好多高手都不知道是怎么回事，所以想请教一下你，这是什么原因，怎么解决？
追答

我一开始就是从2007版本开始用的，你说的问题很少碰到，恕无能为力~
追问

给个联系方式，遇到问题了请教你
追答

可以互通有无，相互学习。⑦⑦①〇⑦①②⑨⑧
追问

这是什么，qq号吗？中间的圆圈代表零吗？
追答

是呀，度不太允许直接发这些东西的
追问

明白了，谢谢