Не могу получить адрес найденой ячейки в Exel

[R_Z]

Есть вопрос. с помощью функции поиска я нахожу на нужном мне листе ячейку с нужным текстом. Потом мне нужно из ячейки которая находится под ней извлечь текст. моя голова с этим не справляется я человек начинающий помогите кто чем может мой код выглядит так:
....
OpenWorkSheet1('Лист1');
What:='то что мы ищем';
After:=EmptyParam;
LookIn:=xlFormulas;
LookAt:=xlPart;
SearchOrder:=xlByRows;
SearchDirection:=xlNext;
IRange:=ExcelWorksheet1.Cells.Find (What,After,LookIn,LookAt,SearchOrd er,SearchDirection,EmptyParam,Empty Param,EmptyParam);
....
потом мне нужно извлеч текст из ячейки на одну справа и вниз от найденой и вывести его ну например в обычный Edit

[EducatedFool]

Как-то так:

Edit1.text:=IRange.Offset(1).value

[R_Z]

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

[IgorGO]

Range(Cells(r1,c1), Cells(r2,c2))
здесь r1,c1,r2,c2 - ряд, колонка. координаты двух угловых ячеейк, находящихся по диагонали друг от друга
или
Range("A1:A100")
или еще с 10 вариантов

[R_Z]

Ну как диапазон получить я понял а как именно Вставить кусок этой таблицы в StrinGrid то есть я написал ExcelWorksheet1.Range['A1','A15']; а что с этим делать я немного не догоняю как это превратить в таблицу у меня на форме?

[EducatedFool]

А если попробовать воспользоваться поиском?

К примеру, один из вариантов есть здесь: http://delphiworld.narod.ru/base/xls_to_stringgrid.html

Ну или обратитесь в соответствующий раздел форума - поскольку в этом разделе больше знакомы с VBA, чем с Delphi.
И не забывайте про поиск по форуму - такие вопросы уже встречались.