'退出Excel
Public Function ExitExcel(oApplication As Object)
If oApplication Is Nothing Then Exit Function
oApplication.DisplayAlerts = False
oApplication.Quit
oApplication.DisplayAlerts = True
End Function在用Excel的时候最讨厌的就是版本不同的情况下,出现一个提示,大意是问你是否重新计算公式,十分讨厌,一般都是通过DisplayAlerts来处理,但是系统里边好多地方都用了Quit,没办法,最后弄了这个函数替换一下,不然以后也麻烦。
本文提供了一个VBA函数,用于在关闭Excel时禁用显示警告对话框的功能,从而避免因不同版本导致的重新计算公式提示。
3837

被折叠的 条评论
为什么被折叠?



