Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

помогите пжлста еще раз с 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 листу.


Наверх

Титульная страница Поиск, карта сайта Написать письмо