Delphi+excel

← →
RaWen © (2007-03-16 20:58) [0]

Как подключить книгу Excel к delphi для осуществления поиска(пробовал АDO не получилось). Если можно подкиньте пример.

← →
Anatoly Podgoretsky © (2007-03-16 21:01) [1]

> RaWen (16.03.2007 20:58:00) [0]

К Дельфи нельзя, пробуй опять с АДО, оно в состоянии работать с этим.

← →
S@shka © (2007-03-16 23:51) [2]

> К Дельфи нельзя, пробуй опять с АДО, оно в состоянии работать
> с этим.

Как это нельзя???

А вот так....

const
Excel = "Excel.Applicaion"

function IsOLEObjectInstalled(Name: String): boolean;
var
ClassID: TCLSID;
Rez : HRESULT;
begin
Rez := CLSIDFromProgID(PWideChar(WideString(Name)), ClassID);
Result := (Rez = S_OK);
end;

function IsExcelInstalled : Boolean;
begin
Result := IsOLEObjectInstalled(Excell);
end;

procedure OpenXLSDocument (const FileName : String);
var
V : Variant;
begin
try
V := GetActiveOleObject (Excell);
except
V := CreateOleObject(Excell);
end;
V.WorkBooks.Open(FileName);
V.Visible := True;
end;

Ну и так далее.... воообщем "Автоматизация Excel в Delphi" в yandex

← →
Плохиш © (2007-03-17 01:49) [3]

> пробовал АDO не получилось

Анекдот напомнило про украинца, сало и афроамериканца...

← →
fd979 © (2007-03-17 08:16) [4]

http://www.filefactory.com/file/2e27bb/

← →
RaWen © (2007-03-17 13:17) [5]

Как сделать поиск в присоединенном екселе?

перебором значений ячеек

locate-ом в dataset-е или запросом в базе/книге.

> перебором значений ячеек
???
ну это только если хочется написать солидную, задумчивую прогу...
есть же методы поиска в екселе, и без разницы как он открыт, руками или как обьект автоматизации... делаешь макрос, смотришь метод и используешь.

Delphi+excel Найти похожие ветки