---------------------- Application.DisplayAlerts = False Workbooks("WkbkName.xls").SaveAs Filename:="Hello.xls" Application.Displayalerts = True An alternative if Dir("Hello.xls") <> "" then kill Hello.xls End if Workbooks("WkbkName.xls").SaveAs Filename:="Hello.xls" -----------------