PHP DM Gate v0.9 » Delphi и Excel

Михаил (23.04.08 17:49) [0]

Как считать данные из выделенных ячеек рабочего листа Excel ?

<Цитата>
YurikGL © (23.04.08 17:53) [1]

посмотри свойства selection

<Цитата>
Михаил (23.04.08 19:05) [2]

Я бы посмотрел, да мне бы сначала к листу подключиться, да его имя узнать.
try
XLApp.ConnectKind:=ckRunningInstance;
XLApp.Connect;
(* здесь надо бы
WBook.ConnectTo(XLApp.Workbooks.Add(EmptyParam, lcid));
но мне не надо новый WorkBook, хочу работать с текущим *)
ASheet.ConnectTo(XLApp.ActiveSheet as ExcelWorkSheet);
(*Error естественно*)
ShowMessage(ASheet.Name);

<Цитата>
Сергей М, (23.04.08 19:26) [3]

> мне не надо новый WorkBook

Ну так а какого же лешего ты его создаешь ?

<Цитата>
Михаил (23.04.08 19:30) [4]

Я и не создаю, но после
XLApp.ConnectKind:=ckRunningInstance;
XLApp.Connect;
ASheet.ConnectTo(XLApp.ActiveSheet as ExcelWorkSheet);
вылазит ошибка доступа.

<Цитата>
Сергей М, (23.04.08 19:36) [5]

> Я и не создаю

Как это не создаешь ?!
А вызов метода WorkBooks.Add - это что, по-твоему ?

> вылазит ошибка доступа.

И правильно "вылазит".

Значит объекта XLApp.ActiveSheet не существует.

<Цитата>
Михаил (23.04.08 20:39) [6]

До рабочего листа я добрался:

XLApp:=TExcelApplication.Create(nil);
XLApp.ConnectKind:=ckRunningInstance;
XLApp.Connect;
ASheet:= TExcelWorksheet.Create(nil);
ASheet.ConnectTo(XLApp.ActiveSheet as ExcelWorkSheet);
ShowMessage(ASheet.Name);
</ CODE>
Осталось добраться до выделенных ячеек.

<Цитата>
Сергей М, (23.04.08 20:43) [7]

> Осталось добраться до выделенных ячеек

Флаг в руки

<Цитата>