To save a spreadsheet
Hello,
Use that :
create "Excel.Application":U chExcelApplication.
chWorkbook = chExcelApplication:Workbooks:add().
/* Character Var*/
def var c_path_out as char no-undo.
def var c_classeurExcel as char no-undo.
/*
* Where the file is going to be save
*/
c_classeurExcel = c_path_out + 'MyFile.xls'.
/*
* Traitement 1 Vacance
*/
chWorkSheet1 = chExcelApplication:Sheets:item(1).
chWorkSheet1:Name = "My name".
/*
* Save command
*/
chWorkBook:SaveAs(c_classeurExcel,,,,,,,).
/*
* Release object
*/
chWorkBook:close.
release object chExcelApplication.
release object chWorkbook.
release object chWorkSheet1.
You can find informations about SaveAs on :
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dv_wrcore/html/wrtskhowtosaveworkbooks.asp
I Hope it will help you.
Frédéric.