在 Excel 中抑制保存更改对话框的两种方法不起作用答案

【问题标题】：Two methods of suppressing the save changes dialog in Excel are not working在 Excel 中抑制保存更改对话框的两种方法不起作用
【发布时间】：2011-10-14 07:10:39
【问题描述】：

对于那些不喜欢图片的人：

  Close logFile
  Application.DisplayAlerts = False 
  If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
  Application.DisplayAlerts = True

Application.DisplayAlerts = False 应该禁止来自 excel 的任何和所有警报。此外，我被引导相信将 False 传递给 .Close 不应该自动保存工作簿上的更改。但是我仍然得到提示。有什么想法吗？

【问题讨论】：

另外，请随意嘲笑那里的愚蠢的 cmets，他们不是我的。
FilenameNoPath 是数组还是函数？我会假设一个函数。
@PaulR 这是一个函数，它不会关闭文件。它只返回没有路径的文件名。
并且该函数中没有任何东西在改变 .DisplayAlerts = True？这是我的第一个想法。
@PaulR 我解决了这个问题，感谢您的帮助。

标签： excel vba

【解决方案1】：

我有预感，同时运行的另一个 Excel 加载项可能会导致该问题。同事建议用代码包装以抑制事件。这有效：

  Application.EnableEvents = False
  Application.DisplayAlerts = False
  If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
  Application.DisplayAlerts = True
  Application.EnableEvents = True

【讨论】：