将* .xlsm文件另存为* .xlsx并禁止弹出窗口

Question

当前活动工作簿是启用宏的工作簿。

执行一些自动数据操作后，我想将其保存为新的无宏工作簿（因此.xlsx而不是.xlsm）。为此，我录制并编辑了一个宏：

Dim newFilePath As string
newFileFullName = "C:\List.xlsx"

ActiveWorkbook.SaveAs Filename:=newFileFullName, FileFormat _
:=xlOpenXMLWorkbook, CreateBackup:=False

Workbooks.Open Filename:=newFileFullName
Windows("List.xlsx").Activate

但是，每当我运行此宏时，window会不断弹出，要求确认我要更改文件格式。

如何禁止弹出窗口并将其默认为“是”？

Answer 1

添加Application.DisplayAlerts = False

谢谢@simoco