我有以下宏是正确的,除非SaveAs我点击No或给我一个错误Cancel,如果我点击yes工作正常.
ActiveWorkbook.SaveAs Filename:=FileName, FileFormat:=xlWorkbook, ConflictResolution:=xlLocalSessionChanges
Application.DisplayAlert =True
Run Code Online (Sandbox Code Playgroud)
但是当我SaveAs选择No保存时,我遇到了以下错误.Excel消息:此位置已存在名为"........."的文件.你想替换它吗?我单击"否"或cancel得到运行时错误1004 .... SaveAs对象方法_Workbook失败.
我不想使用Application.DisplayAlerts = False,因为我希望用户知道有一个已经命名相同的文件.
No或Cancel不获取运行时错误.