[RESOLVED] Overwriting files

[Aelanna]

Ok, I am using oWorkBook.SaveAs to tell Excel to save a workbook. The file already exists, since I had to open it to make the changes in the first place, and I want to always overwrite the file when I'm done. Is there any way to either supress the overwrite prompt or tell it to yes always overwrite from inside the program? If I have to click yes on that prompt after every single transaction I process it will be a pain.

And before you ask, yes, I need to save it after each one, because it pulls the information that goes into the sheets off a form that is changed from one transaction to the next.

If you need to see the code, let me know.

[RobDog888]

You can do it either way...

Application.DisplayAlerts = False
Application.Workbooks("Book1.xls").Save
Application.Workbooks("Book1.xls").Saved = True
Application.Workbooks("Book1.xls").Close
Application.DisplayAlerts = True
'Or
Application.DisplayAlerts = False
Application.Workbooks("Book1.xls").Close SaveChanges:=True, Filename:="C:\Book1.xls"
Application.DisplayAlerts = True

[Aelanna]

I ended up doing it this way and it works fine:

Application.DisplayAlerts = False ' turn off overwrite prompt
            oBook.SaveAs ("C:\FHR\StableBankAccounts.xls")
            Application.DisplayAlerts = True

I'm using SaveAs so it will stay compatibel with Execl 97 (this is being done in Excel 2000).

[RobDog888]

You need to verify that your book is getting the updates applied because when turning of displayalerts it accepts the defaults on the supressed message box. The "No" is the default.

[Aelanna]

Oh, I did. I loaded the sheet into Excel 97 and verified that the right stuff was put in the right cells, and it's all working fine. I'm really pleased with how this project is coming along.