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

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

Программно установить ActiveSheet [D7, XP]


DimDim ©   (2007-06-05 22:32:00) 

Уважаемые Мастера, что-то я перегрелся!
Передаю данные в Excel. Как программно в активной книге перейти на другую страницу (сделать ее ActiveSheet)?
Заранее спасибо...


Loginov Dmitry   (2007-06-05 23:51:00) [1]

> Никак нет!
>
> Вот моя процедура подключения:


и что от этого меняется?

Работай через OLE, проблем меньше будет. Особенно с переходом на новые версии Delphi.
Примеры тут:
http://delphiworld.narod.ru/_tech_.html
(ветка OLE Automation MSOffice)


DimDim   (2007-06-05 23:37:00) [2]

> Наверно потому что используешь уродские компоненты со вкладки Servers

Никак нет!

Вот моя процедура подключения:

var xlApp : TExcelApplication;
...
procedure TDM1.ExcelCreate(NewInstance: boolean);
begin
 if not Assigned(xlApp) then
   begin
   xlApp.free;
   xlApp := TExcelApplication.Create(Self);
   xlApp.AutoConnect:=True;
   xlApp.Connect;
   end;  
end;


Loginov Dmitry   (2007-06-05 23:29:00) [3]

Наверно потому что используешь уродские компоненты со вкладки Servers


DimDim   (2007-06-05 23:17:00) [4]

Так и пытался делать во всех возможных комбинациях.
Дает ошибку: "Undeclared identifier 'Activate'".
В uses подключены comobj и OleServer.


Loginov Dmitry   (2007-06-05 22:56:00) [5]

Excel.Sheets['ИМЯ_ЛИСТА'].Activate;
либо
Excel.Sheets[ИНДЕКС_ЛИСТА].Activate;


Наверх

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