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

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

Скопировать строки в Excel [D7, XP]


Страницы:   1 2

Neket ©   (2007-04-25 11:50:00) 

Копирую строки Row :-) из одной книги в другую таким образом:


Var
Excel,XL,XLApp,Nah:Variant;
begin
Excel:= CreateOleObject('Excel.Application');
XL:=Excel.Workbooks.Open(FName);// Открываю существующий файл

XLApp:=CreateOleObject('Excel.Application');
XLNah:=XLApp.Workbooks.Add();// Формирую новый
//------
XLApp.Workbooks[1].WorkSheets[1].Range[XLApp.Workbooks[1].WorkSheets[1].Cells.It em[k, 1], XLApp.Workbooks[1].WorkSheets[1].Cells.Item[k,EmptyParam]].copy(Excel.Workbooks[ 1].WorkSheets[2].Range[Excel.Workbooks[1].WorkSheets[2].Cells.Item[k, 1], Excel.Workbooks[1].WorkSheets[2].Cells.Item[k,EmptyParam]]);


Вылетает ошибка - "Метод Copy из Класса Range завершо неверно"


iXT   (2007-04-25 12:16:00) [21]

> зачем два экселя?

Тоже подумал. Открыл два файлика (xls). Глядь в диспетчер. И там два EXCEL. Ну фиг с ними. Может так ему лучше :). Но это же не смертельно (если тачка позволяет, конечно). Он жалуется на COPY


umbra   (2007-04-25 12:09:00) [22]

зачем два экселя?


iXT   (2007-04-25 12:09:00) [23]

Здается мне OleVariant


Neket   (2007-04-25 11:56:00) [24]

Сори.....
Вот сдесь так :
Var
Excel,XL,XLApp,XLNah:Variant


Страницы:   1 2

Наверх

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