Save an excel file from within a vbscript

4/18/2017

Tom Cieslik

4/17/2017

If you do have access to macro and you can modify, just change path to

\\SERVER\SHARE\FOLDER\

Than try run macro again

4/17/2017

The quotes in the commented out line don't look right, they should be " not “.

Try this.

objWorkbook.SaveAs "M:\Test\Test.csv"

By the way, you might want to specify the file format when saving.

For a CSV the file format constant would be xlCSV which has the value 6 so to save with that format use this.

objWorkbook.SaveAs "M:\Test\Test.csv", 6

4/17/2017

ASKER

Norie, thank you. That works. Any way to not have it prompt to ask me to save the changes?

4/17/2017

Try this.

objExcel.ActiveWorkbook.Close False

Bill Prew

4/18/2017

If you want to save any changes made but not be prompted you can use the following approach, setting the DisplayAlerts property to prevent the popup question(s).

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("M:\Test\Test.csv")

objExcel.Application.Visible = True

objExcel.Application.Run "PERSONAL.XLSB!Macro1"

objExcel.DisplayAlerts = False
objExcel.ActiveWorkbook.Close True
objExcel.Application.Quit

WScript.Quit

~bp

4/18/2017

ASKER

Thank you. That does work to save the file. Ideally I'd like to save the file to a different folder but using objWorkbook.SaveAs isn't working for me.

ASKER CERTIFIED SOLUTION

4/18/2017

THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.

View this solution by signing up for a free trial.

Members can start a 7-Day free trial and enjoy unlimited access to the platform.

See Pricing Options

Start Free Trial

4/18/2017

ASKER

Thank you Norie. I tried both but keep receiving an error.

Line: 9
Char: 1
SaveAs Method of Workbook class failed
Code: 800A03EC

4/18/2017

Can you post the exact code you tried?