macros中的对话框

使用macros时，是否有任何方法可以否定在将具有相同名称的文件保存到文件夹时单击button的需要？ 我用相同的名字保存文件，每当popup的对话框询问“一个名为XXXXX.xlsx的文件已经存在于这个位置，你想replace它吗？ 有必要点击“是”有没有一种方法可以否定？ 我已经复制下面的macros的一个样本。

Sheets("TAB 1").Select ActiveSheet.Range("$A:$BV").AutoFilter Field:=1, Criteria1:="500710" Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select Selection.Copy Workbooks.Add ActiveSheet.Paste Application.CutCopyMode = False ChDir "\\SERVER\C\t\Holding" ActiveWorkbook.SaveAs Filename:= _ "\\SERVER\C\t\Holding\500710.xlsx", FileFormat _ :=xlOpenXMLWorkbook, CreateBackup:=False ActiveWindow.Close Range("A1").Select Sheets("Instructions").Select Range("A1").Select End Sub 

Answer 1

在SaveAs之前closures警报。 确保以后再打开它们。

 Application.DisplayAlerts = False ' Your save code goes here Application.DisplayAlerts = True