SaveAs defaults...
If you want to not overwrite the file, then test for its existence and do
not execute the save
Logfile = "filename.xls"
if Dir(curdir() & "\" & logfile) = "" then
ActiveWorkbook.SaveAs Filename:=CurDir() & "\" & Logfile,
Else
msgbox "File conflict"
End if
--
Regards,
Tom Ogilvy
"John Keith" wrote in message
...
Using this code to save when the file already exists...
Logfile = "filename.xls"
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=CurDir() & "\" & Logfile,
ConflictResolution:=xlLocalSessionChanges
Application.DisplayAlerts = True
How do you know which default (yes|no) is taken to the overwrite message?
I assume from all the posts I have seen on this topic that the "yes"
default
is taken, but what if you wanted the "no" option taken?
The parm for "ConflictResolution" seems like that should handle it, but
the
options shown in the help files do not cover this.
--
Regards,
John
|