Как сохранить XLS файл автоматически?

[GTHack]

Идея: пометили счет-фактуры запустили отчёт "выгрузка данных в Exel" который стартует мой фейс в котором нужно скинуть данные в файлик xls.
файл открываю xlCreateExcelWithTemplate
и кидаю туда данные, дак вот он данные то скидывает но сам Exel спрашивает куда сохранить файл? мне этого не надо - надо чтоб молча сохранил под тем же именем какое и было не открывая Exel.

еще вопросик
у кого нить есть описание ф-ий ?
XLOPENWORKBOOK
XLSAVEWORKBOOK
XLSAVEASWORKBOOK
XLCLOSEWORKBOOK
XLSAVEWORKBOOKBYNAME
XLSAVEASWORKBOOKBYNAME
XLCLOSEWORKBOOKBYNAME
XLGETWORKBOOKSCOUNT

[dp]

Все что есть в документации

Работа с книгой Excel
xlOpenWorkBook
Function xlOpenWorkBook(FileName : shortstring) : boolean;

xlSaveWorkBook
Function xlSaveWorkBook(iNumber : shortint) : boolean;

xlSaveAsWorkBook
Function xlSaveAsWorkBook(iNumber : shortint; FileName : shortstring) : boolean;

xlCloseWorkBook
Function xlCloseWorkBook(iNumber : shortint) : boolean;

xlSaveWorkBookByName
Function xlSaveWorkBookByName(sName : shortstring) : boolean;

xlSaveAsWorkBookByName
Function xlSaveAsWorkBookByName(sName : shortstring; FileName : shortstring) : boolean;

xlCloseWorkBookByName
Function xlCloseWorkBookByName(sName : shortstring) : boolean;

xlGetWorkBooksCount
Function xlGetWorkBooksCount(var iCount : shortint) : boolean;

xlSetActiveWorkBook
Function xlSetActiveWorkBook(wNumber : word) : boolean;
Установить активную книгу по ее порядковому номеру.
Возвращает результат операции.
xlSetActiveWorkBookByName
Function xlSetActiveWorkBookByName(sName : string) : boolean;
Установить активную книгу по ее наименованию.
Возвращает результат операции.

xlGetActiveWorkBookName
Function xlGetActiveWorkBookName(var sName : string) : boolean;
Получить наименование активной книги.
Возвращает результат операции.

[dp]

для сохранения например

OutFileName := GetStringParameter('Files','OutputFilesDirectory',0)+'otchData10.xls';

xlGetActiveWorkBookName(tmpStr);
if not xlSaveAsWorkBookByName(tmpStr, OutFileName)
message('Ошибка сохранения отчета как'#13+OutFileName, Error);

[GTHack]

сенк
проканало

[Алексей]

1. а зачем обязательно делать функцию xlGetActiveWorkBookName(tmpStr); ?
2. как сделать чтобы он без вопросов перезаписывал файл?

может уже новые какие функции есть по сохранению файла с перезаписью без диалога?

[RAJAH]

как сделать чтобы он без вопросов перезаписывал файл?

Код: Выделить всё

xlOpenNewExcel(false);
...
xlDisplayAlerts(false);
xlSaveAsWorkBook(1, 'C:\xls\225.xls');
xlKillExcel;

[Алексей]

ага, спсб. я уже проверил на существование и удалил но это тоже подойдет.