before the SaveAs command, if you include the line:
Application.DisplayAlerts = False
and then after your SaveAs command, include the line:
Application.DisplayAlerts = True
This will ignore the alert that asks if you want to replace the existing file.
JAF
Not too sure what you mean... wouldn't a if then statement work here?
x
BJ
Sub Save_As_Code_No_Alerts()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="C:\TestFiles\SaveAsTest.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Application.DisplayAlerts = True
End Sub