Имя: Пароль:
1C
1С v8
Из 1С в Excel: Как получить текст строки в которой нашли слово?
0 MikhaNik
 
21.11.11
08:54
Как получить найденную строку в Excel?
т.е. ищу слово, а потом надо получить всю строку, в которой это слово находится

Excel=Новый COMОбъект("Excel.Application");    
Книга = Excel.WorkBooks.Open(ИмяФайла);
КоличествоЛистов = Книга.Sheets.Count;
Для НомерСтраницы=1 по КоличествоЛистов Цикл
   Лист = Книга.WorkSheets(НомерСтраницы);
   ОбластьПоиска = Лист.Cells;            
   НачалоЛиста = Лист.Cells(1, 1);
   ОбластьПараметр = ОбластьПоиска.Find(СокрЛП(СтрокаПоиска), НачалоЛиста);
   Если ОбластьПараметр <> неопределено Тогда
       // Тут надо получить текст строки в которой нашли значение
   КонецЕсли;
КонецЦикла;
1 MatrosoV AleXXXand_R
 
21.11.11
08:55
А в отладчике посмотреть?
2 MatrosoV AleXXXand_R
 
21.11.11
08:56
ОбластьПараметр.Activate()
3 MikhaNik
 
21.11.11
09:02
ОбластьПараметр.Activate() = Истина
а тут нужна функция получения позииции строки в данной области,  а там уже дело просто ее прочитать
4 MikhaNik
 
21.11.11
09:03
в принципе сам себе ответил на вопрос)