ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Error on ActiveWorkbook.SaveAs method (https://www.excelbanter.com/excel-programming/298501-error-activeworkbook-saveas-method.html)

cruisy

Error on ActiveWorkbook.SaveAs method
 
Hi there,
I hope there is a really simple answer to this but I have not been abl
to find a simple solution to error trapping the ActiveWorkbook.SaveA
method. When the following command runs (inside a macro) and I selec
'yes' from the dialog box when it says "the file already exists do
want to replace it?" - that's fine. When I select 'no' or 'cancel' th
following error occurs... Runtime Error 1004: "Method 'SaveAs' o
object '_workbook' failed

The method is: (where sWorkBookPath and sFileName are variables for m
path and filename)

ActiveWorkbook.SaveAs Filename:=sWorkBookPath & "\" _
& sFileName & ".txt", FileFormat:=xlText, CreateBackup:=False

How do I stop the macro crashing when I select 'no'

Kindy Regards
And

--
Message posted from http://www.ExcelForum.com


Chris

Error on ActiveWorkbook.SaveAs method
 
try putting in either
On Error Resume Next
O

On Error Goto

Or handle the specific erro


On Error GoTo ErrHandler

ErrHandler
If Err.Number = 1004 And
Err.Description = "Method 'SaveAs' of object '_workbook' failed" The
Resume Nex
End If
Make sure you match the description exactly as it shows up in the error

----- cruisy wrote: ----

Hi there
I hope there is a really simple answer to this but I have not been abl
to find a simple solution to error trapping the ActiveWorkbook.SaveA
method. When the following command runs (inside a macro) and I selec
'yes' from the dialog box when it says "the file already exists do
want to replace it?" - that's fine. When I select 'no' or 'cancel' th
following error occurs... Runtime Error 1004: "Method 'SaveAs' o
object '_workbook' faile

The method is: (where sWorkBookPath and sFileName are variables for m
path and filename

ActiveWorkbook.SaveAs Filename:=sWorkBookPath & "\"
& sFileName & ".txt", FileFormat:=xlText, CreateBackup:=Fals

How do I stop the macro crashing when I select 'no

Kindy Regard
And


--
Message posted from http://www.ExcelForum.com



Tim Zych[_8_]

Error on ActiveWorkbook.SaveAs method
 
If you always want to save the workbook, this macro won't ask any questions.
It will just save.

Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=sWorkBookPath & "\" _
& sFileName & ".txt", FileFormat:=xlText, CreateBackup:=False
Application.DisplayAlerts = False



"cruisy " wrote in message
...
Hi there,
I hope there is a really simple answer to this but I have not been able
to find a simple solution to error trapping the ActiveWorkbook.SaveAs
method. When the following command runs (inside a macro) and I select
'yes' from the dialog box when it says "the file already exists do I
want to replace it?" - that's fine. When I select 'no' or 'cancel' the
following error occurs... Runtime Error 1004: "Method 'SaveAs' of
object '_workbook' failed

The method is: (where sWorkBookPath and sFileName are variables for my
path and filename)

ActiveWorkbook.SaveAs Filename:=sWorkBookPath & "\" _
& sFileName & ".txt", FileFormat:=xlText, CreateBackup:=False

How do I stop the macro crashing when I select 'no'

Kindy Regards
Andy


---
Message posted from http://www.ExcelForum.com/




cruisy[_2_]

Error on ActiveWorkbook.SaveAs method
 
Thanks guys - both solutions worked a treat.
Cheers :)


---
Message posted from http://www.ExcelForum.com/



All times are GMT +1. The time now is 01:59 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com