ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Automatically Replacing existing file on save (https://www.excelbanter.com/excel-programming/322455-automatically-replacing-existing-file-save.html)

WindsurferLA

Automatically Replacing existing file on save
 
I'm using XL97 under WinXP-pro.

I use a "Sub auto_close()" macro to save my workbook when I close it.

The following VB code does the job of overwriting the existing file, but
it does not add the file to the Most Recently used (MRU) list:

Workbooks("Actions0.xls").Save

The following VB code adds the the file to the MRU list, but it requires
manual authorization to overwrite the existing file:

ActiveWorkbook.SaveAs FileName:= _
"C:\Documents and Settings\Michael\My
Documents\__Scratch\_2005Jan\XLmenu\Actions0.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False, AddToMru:=True

The following code does NOT seem to work:
Workbooks("Actions0.xls").Save, AddToMru:=True

Can someone clue me in to the right syntax. I could not find it in any
of my reference books.

Thanks ... WindsurferLA



Bob Phillips[_6_]

Automatically Replacing existing file on save
 
IN the code that works, precede with

Application.DisplayAlerts = False

reset at the end.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"windsurferLA" wrote in message
...
I'm using XL97 under WinXP-pro.

I use a "Sub auto_close()" macro to save my workbook when I close it.

The following VB code does the job of overwriting the existing file, but
it does not add the file to the Most Recently used (MRU) list:

Workbooks("Actions0.xls").Save

The following VB code adds the the file to the MRU list, but it requires
manual authorization to overwrite the existing file:

ActiveWorkbook.SaveAs FileName:= _
"C:\Documents and Settings\Michael\My
Documents\__Scratch\_2005Jan\XLmenu\Actions0.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False, AddToMru:=True

The following code does NOT seem to work:
Workbooks("Actions0.xls").Save, AddToMru:=True

Can someone clue me in to the right syntax. I could not find it in any
of my reference books.

Thanks ... WindsurferLA





WindsurferLA

Automatically Replacing existing file on save
 
Bob Phillips wrote:
IN the code that works, precede with

Application.DisplayAlerts = False

reset at the end.

Good Idea... Thanks .... WindsurferLA


All times are GMT +1. The time now is 12:16 PM.

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