world vba 保存excel “保存此工作簿时检查兼容性”

在Excel VBA中，如果你想在保存工作簿时启用“保存此工作簿时检查兼容性”的选项，这通常涉及在宏的安全性和信任级别方面做设置。以下是如何实现的步骤[^1]：

1. 打开VBA编辑器（可以通过菜单栏的“开发”->“Visual Basic”访问）。

2. 选择“Tools”（工具）菜单，然后选择“References”（引用），确保Microsoft Excel Object Library（Microsoft Office 应用程序的COM对象）已被选中并处于活动状态。

3. 创建一个新的模块，或者如果你已经有宏代码，就在那个模块里添加以下代码：

   Sub Workbook_BeforeSave(Cancel As Boolean)
       If Not Cancel Then
           Application.DisplayAlerts = False ' 关闭对话框以避免显示警告
           ThisWorkbook.SaveAs Filename:=ThisWorkbook.FullName & "_Compat", FileFormat:=xlOpenXMLWorkbookMacroEnabled ' 保存为带宏的工作簿
           Application.DisplayAlerts = True ' 恢复默认的警告显示
       End If
   End Sub

4. 这段代码会在保存工作簿之前执行，它会创建一个新的副本(_Compat.xlsx)，并将原来的宏启用。`xlOpenXMLWorkbookMacroEnabled`格式表示这是个带宏的工作簿。