Saveas

D

Dale Levesque

I'm using the following code to save a file.

ActiveWorkbook.SaveAs FileName:=fs_Path & "Data\" & ls_SmallSaveName &
".xls", FileFormat:= _
xlNormal, Password:="", writerespassword:="",
ReadOnlyRecommended:=False _
, CreateBackup:=False

A dialog box comes up if the file already exists asking whether to replace
it.

How can I handle it if the user says 'No'?

Thanks,

Dale
 
F

Frank Kabel

Hi
to save in all cases try
application.displayalerts=false
ActiveWorkbook.SaveAs FileName:=fs_Path & "Data\" &
ls_SmallSaveName &
".xls", FileFormat:= _
xlNormal, Password:="", writerespassword:="",
ReadOnlyRecommended:=False _
, CreateBackup:=False
application.displayalerts=True
 
B

Bob Phillips

Dale,

What do you mean by handle it? If you are happy that the user can say no,
then there is nothing more to do.If you are not happy with this and insist
that it is saved, you could precede the SaveAs with

Application.DisplayAlerts = False

and then the question doesn't get asked. Reset to True afterwards.
 
D

Dale Levesque

No Frank, I'd like to close the current workbook without saving as the
specified name when the user selects 'No'.

Dale
 
Top