使用VBA将包含Excel文件(.xlsm)的宏保存为包含非宏的文件(.xlsx)时禁止对话框

Question

如何禁止显示"如果以此格式保存文件,将删除Visual Basic宏的对话框.您确定要使用此格式吗？" (见下图).

基本上,我正在尝试使用宏来将.xlsm文件保存为.xslx文件？我已经尝试了所有可以找到的对话框抑制代码但它无法正常工作.

这是我的代码:

Private Sub SaveWithNoMacros()
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Application.EnableEvents = False
    ActiveWorkbook.SaveAs Filename:="Clean Workbook With No Macros.xlsx", _  
       FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    Application.EnableEvents = True
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
 End Sub

这是对话框:

正如您可能想象的那样,我需要转换很多工作簿,并且不希望手动执行此操作.

-D.

Answer 1

Application.DisplayAlerts = False是禁用此对话框的正确语句.但是,正如您所经历的那样,这在Excel 2011上不起作用.遗憾的是,当您使用Excel 2011时,没有办法解决这个问题.如果您使用任何其他版本(在PC上)它会工作得很好.