Thread: Saveas
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Frank Kabel Frank Kabel is offline
external usenet poster
 
Posts: 3,885
Default Saveas

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



--
Regards
Frank Kabel
Frankfurt, Germany


Dale Levesque wrote:
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