| Вопрос: Поиск ячеек в закрытых книгах? | Добавлено: 08.08.06 10:55 |
Автор вопроса:  roman.dorosh | ICQ: 98700332 |
|
Уважаемые знатоки!
В продолжение топика http://www.vbnet.ru/forum/show.aspx?id=110918 можна ли не открывая определённую книгу Excel, к примеру содержащую два поля (name/val): Иванов 0 Чикотило 1 Янукович 2 возвратить в активную книгу значение val соответствующее искомому name. Имена неизменны, но их порядок может меняться. Заранее спасибо! |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 08.08.06 11:34 |
|
Создав формулу, ссылающуюся на эту книгу.
Мышью. Как обычно. "=" и кликнуть. |
||
|
Номер ответа: 2 Автор ответа: VβÐUηìtВопросов: 246 Ответов: 3333 |
Web-сайт: Профиль | | #2 | Добавлено: 08.08.06 11:46 |
| Если в VBA то не знаю, а на VB можно мирно DataControl обойтись. | ||
|
Номер ответа: 3 Автор ответа: roman.dorosh ICQ: 98700332 Вопросов: 2 Ответов: 5 |
Профиль | | #3 | Добавлено: 08.08.06 14:58 |
|
>> Создав формулу, ссылающуюся на эту книгу.
Так сначало нужно найти ячейку, на которую скрипт должен "кликнуть" |
||
|
Номер ответа: 4 Автор ответа: VβÐUηìtВопросов: 246 Ответов: 3333 |
Web-сайт: Профиль | | #4 | Добавлено: 08.08.06 17:55 |
|
Чикотило 1 Янукович 2 <No comments> |
||
|
Номер ответа: 5 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #5 | Добавлено: 08.08.06 21:08 |
|
Так сначало нужно найти ячейку, на которую скрипт должен "кликнуть"
Скрипт не должен кликать. Формула создаётся на листе один раз. Руками. |
||
|
Номер ответа: 6 Автор ответа: roman.doroshICQ: 98700332 Вопросов: 2 Ответов: 5 |
Профиль | | #6 | Добавлено: 09.08.06 12:10 |
|
For Each c In [A1:A50]
If c.Value Like "blabla*" Then tmp1 = c.Address tmp2 = c.Value End If Next А каким образом получить значение из соседней к найденой ячейки? |
||
|
Номер ответа: 7 Автор ответа: roman.doroshICQ: 98700332 Вопросов: 2 Ответов: 5 |
Профиль | | #7 | Добавлено: 09.08.06 14:44 |
|
Разобрался, вот каким:
For Each c In [A1:A50] If c.Value Like "blabla*" Then tmp1 = c.Offset(, 1) End If Next |
||
Страница: 1 |