save & backup file
 

I have following code recorded, how could I
1) save workbook without message box prompt to overwrite the existing file
name
2) synchronization content in backup file

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Don\My Documents\Book1.xls",
FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=True
ActiveWorkbook.Close (True)
Rgds

save & backup file
 

Try

Application.DisplayAlerts = False
'SaveAs code
Application.DisplayAlerts = True

--
If this post helps click Yes
---------------
Jacob Skaria


"Seeker" wrote:

I have following code recorded, how could I
1) save workbook without message box prompt to overwrite the existing file
name
2) synchronization content in backup file

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Don\My Documents\Book1.xls",
FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=True
ActiveWorkbook.Close (True)
Rgds