Страница 1 из 1
Как сохранить XLS файл автоматически?
Добавлено: 13 май 2004, 14:44
GTHack
Идея: пометили счет-фактуры запустили отчёт "выгрузка данных в Exel" который стартует мой фейс в котором нужно скинуть данные в файлик xls.
файл открываю xlCreateExcelWithTemplate
и кидаю туда данные, дак вот он данные то скидывает но сам Exel спрашивает куда сохранить файл? мне этого не надо - надо чтоб молча сохранил под тем же именем какое и было не открывая Exel.
еще вопросик
у кого нить есть описание ф-ий ?
XLOPENWORKBOOK
XLSAVEWORKBOOK
XLSAVEASWORKBOOK
XLCLOSEWORKBOOK
XLSAVEWORKBOOKBYNAME
XLSAVEASWORKBOOKBYNAME
XLCLOSEWORKBOOKBYNAME
XLGETWORKBOOKSCOUNT
Re: Как сохранить XLS файл автоматически?
Добавлено: 13 май 2004, 15:26
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;
Получить наименование активной книги.
Возвращает результат операции.
Re: Как сохранить XLS файл автоматически?
Добавлено: 13 май 2004, 15:37
dp
для сохранения например
OutFileName := GetStringParameter('Files','OutputFilesDirectory',0)+'otchData10.xls';
xlGetActiveWorkBookName(tmpStr);
if not xlSaveAsWorkBookByName(tmpStr, OutFileName)
message('Ошибка сохранения отчета как'#13+OutFileName, Error);
Re: Как сохранить XLS файл автоматически?
Добавлено: 14 май 2004, 12:36
GTHack
сенк
проканало
Re: Как сохранить XLS файл автоматически?
Добавлено: 12 дек 2013, 11:54
Алексей
1. а зачем обязательно делать функцию xlGetActiveWorkBookName(tmpStr); ?
2. как сделать чтобы он без вопросов перезаписывал файл?
может уже новые какие функции есть по сохранению файла с перезаписью без диалога?
Re: Как сохранить XLS файл автоматически?
Добавлено: 12 дек 2013, 12:32
RAJAH
Алексей писал(а):как сделать чтобы он без вопросов перезаписывал файл?
Код: Выделить всё
xlOpenNewExcel(false);
...
xlDisplayAlerts(false);
xlSaveAsWorkBook(1, 'C:\xls\225.xls');
xlKillExcel;
Re: Как сохранить XLS файл автоматически?
Добавлено: 12 дек 2013, 13:32
Алексей
ага, спсб.
я уже проверил на существование и удалил
но это тоже подойдет.