excel - 针对 "Significant Loss of Functionality"错误关闭 Excel 兼容性检查器

Question

我发现，虽然可以通过代码(通过使用 ActiveWorkbook.CheckCompatibility = False，在 SaveAs 调用之前以编程方式禁用 Excel 的“兼容性检查器”或全局捕获 ActiveWorkbook.BeforeSave 事件)，如果检测到“功能严重丢失”，它似乎不起作用。测试这个的快速方法:

• 创建一个新的 Excel 2010 工作簿。
• 选择 A1:A2 并选择条件格式(不管是什么)。
• 选择 A2:A3 并选择不同的条件格式。 A2 应应用两种不同的条件格式。

• 打开VBA编辑器，在Workbook模块中添加如下代码:

  Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
      ActiveWorkbook.CheckCompatibility = False
  End Sub
  

• 在代码中放置一个断点。

• 返回电子表格，选择"file">“另存为”。代码将立即跳转到断点。如果您单步执行代码，则可以在“立即” Pane 中验证 CheckCompatibility 设置。
• 代码完成后，选择 Excel 97-2003 文件类型并点击“保存”。
• 兼容性检查器仍然出现。

我怀疑这是因为该错误不是“次要兼容性问题”(参见 http://msdn.microsoft.com/en-us/library/office/gg132972(v=office.14).aspx)，但我似乎没有采取任何措施来抑制此错误，甚至没有创建注册表项来禁用它。任何人都知道如何在“显着”不兼容的情况下抑制检查器？

预计到达时间:在不涉及很多不必要的细节的情况下，我尝试自动化一个流程，其中打开多个供应商模板，填充数据，根据大量(并且总是略有不同)的质量控制集进行处理规则，并另存为 .xls 文件(根据供应商的要求)。因为在无人值守的系统上，每两个小时就会在几十个不同的模板工作簿上发生这种情况，所以我不能简单地取消选中每个工作簿的兼容性要求。我的意思是，我想我可以，但这将成为我的全职工作。我需要能够在运行时第一次关闭任何工作簿的兼容性检查，而无需人工干预。

Answer 1

尝试使用 Application.DisplayAlerts = False 作为解决方法。

再见