![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
помогите пжлста еще раз с Excel
Daria © (2005-12-15 10:34:00)Приветики!!! :)
Моя прога работает! Строчки красит, сортирует. Вот только мне не нравится как она сохраняет....
Я создаю книгу с 6 листами, туда загоняю строки из dbgrid. А сохранить мне нужно каждый лист отдельным файлом. Как это сделать?
Daria (2005-12-15 11:48:00) [1]уже разобралась :))
Daria (2005-12-15 11:45:00) [2]и еще к тому же...
я создаю директорию, в кот сохраняю файлы excel. и хочу, чтобы во время выполнения программы, если уже файлы с таким именем существуют, не вылезало окошко ".....заменить файл?", а сразу заменяло... как?
Daria (2005-12-15 11:40:00) [3]ой, спасибо! все работает
umbra (2005-12-15 11:25:00) [4]
> а надо писать в конце Excel.Workbooks[1].Close;
конечно. может, и сохранять надо.
> он в процессах оставляет море EXCEL.EXE
чтобы их не было, надо до закрытия экселя (excel.quit;) закрыть все открытые книги и присвоить всем переменным типа Variant значение UnAssigned. тогда при завершении приложения без ошибок эксели из процессов будут исчезать.
Лучше вообще все действия с оле-серверами делать в блокахtry ... finally, причем в finally все закрывать и освобождать
Daria (2005-12-15 11:16:00) [5]спасибо! уже работает. а надо писать в конце Excel.Workbooks[1].Close;?
и еще он в процессах оставляет море EXCEL.EXE
umbra (2005-12-15 11:13:00) [6]
Excel:=CreateOleObject('Excel.Application');
Excel.SheetsInNewWorkbook:=1;
for i := 1 to 6 do
Excel.WorkBooks.Add;
WorkBook:= Excel.WorkBooks(1);
{делаете, то, что надо}
excel.quit;
excel := Unassigned;
alex_*** (2005-12-15 11:10:00) [7]WorkBook:=Excel.WorkBooks.Add;
Daria (2005-12-15 11:07:00) [8]а как это сделать?
alex_*** (2005-12-15 11:02:00) [9]для одного экземпляра ексель можно разных WorkBook наоткрывать/насоздавать
Daria (2005-12-15 10:39:00) [10]если мне нужно создать несколько док-тов ексель, то для каждого надо писать:
Excel := Null;
Excel:=CreateOleObject('Excel.Application');
Excel.SheetsInNewWorkbook:=1;
WorkBook:=Excel.WorkBooks.Add;
??
Sergey13 (2005-12-15 10:37:00) [11]2Daria (15.12.05 10:34)
>Я создаю книгу с 6 листами
А если наоборот? Создавать 6 книг по 1 листу.