VBA Excel备份:通过VBA以新名称保存当前工作簿的副本,保留VBA脚本,不提示

我需要制作一个VBA脚本,可以获取当前工作簿的完整副本,并以新名称保存。

它需要是VBA脚本和一切的完整副本。

用户可能不会提示什么 – 新的文件名(和位置)将由代码提供。

当然这样的东西就足够了?

 Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="C:\Data.xlsm" Application.DisplayAlerts = True