Имя: Пароль:
1C
1C 7.7
v7: 1C и Excell
,
0 arkber84
 
13.04.15
20:57
Подскажите как в 1С77 найти ячейку(в екселе)  в заданной колонке или на всем листе по заданному значению и получить номер строки этой ячейки. Спасибо.
1 фобка
 
13.04.15
20:59
find()
2 Злопчинский
 
13.04.15
21:05
(0)  случится казус
Ибо вдруг окажется что искомое значение присутствует в не кольких ячейках
3 arkber84
 
13.04.15
21:08
(2)Оно уникальное
4 Злопчинский
 
13.04.15
22:18
Запиши макрос в экселе который протоколирует твои действия при интерактивном поиске
И потом творчески переработай код
5 lavalit
 
13.04.15
22:31
Делать вот так:
допустим надо найти ячейку с текстом "КакойТоТекст" в файле C:\1.xls

Excel = CreateObject("Excel.Application");// вкл ёескль
Excel.Workbooks.Open("C:\1.xls");         // откр наш файл
    
НашаЯчейка = Excel.activesheet.Cells.Find("КакойТоТекст");//Даем команду "фас" ёкселю

Получаем строку в НашаЯчейка.Row
и колонку в НашаЯчейка.Column
Далее радуемся жизни и получаем удовольствие)))))
6 lavalit
 
13.04.15
22:36
Но сам макрос в оригинале вот такой :

    Cells.Find(What:="КакойТоТекст", After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False).Activate
7 lavalit
 
13.04.15
22:39
Как видно больше половины параметров не нужны по умолчанке они такие и будут
8 lavalit
 
13.04.15
23:13
А вот еще... лучше через попытку сделать... иначе если искать то чего нет то вывалится в ошибку .. а енто не есть гут))) луче по исключению оно расскажет, что оно не может найти
9 GreyK
 
14.04.15
00:00
(0) Бляхомухо , ещё остались покупатели Экселя. У нас за неимением денег на сию программку АДО используют.
10 lavalit
 
14.04.15
18:15
(9) )))) Так то же самое можно заполучить и с опенофисом (Он же ЛибрОфис)))) тот же ёксель тока вид сбоку)))
Программист всегда исправляет последнюю ошибку.