Смысл следюущий: из Делфи нужно отыскать текст в открытой книге excel и определить координаты ячейки. Нашел только метод find, вроде как должен был сработать, но что-то не получилось:
Код HTML:
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
e: TExcelApplication;
procedure Button1Click(Sender: TObject);
end;
var
Form1: TForm1;
Findt, sheet:variant;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
e.Workbooks.Open(getcurrentdir+'\1.xls',emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,empty param,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptypar am,0);
sheet:=e.workbooks[1].worksheets['лист1'];
Findt:=sheet.cells.find(what:='5');
edit2.Text:=findt.text;
end;
Возвращает в edit2.Text значение '5', а мне нужны координаты ячейки. Может быть надо не свойство .text использовать?
Подскажите, плз!!!