Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Rows для метода Find или указать диапазон для метода Find - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Rows для метода Find или указать диапазон для метода Find (Макросы/Sub)
Rows для метода Find или указать диапазон для метода Find
Elhust Дата: Вторник, 11.07.2017, 09:54 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 158
Репутация: -1 ±
Замечаний: 0% ±

Excel 2010
Добрый день уважаемые специалисты и просто гуру
Вопрос заключается в том что я не могу разобраться как указать диапазон для поиска

Этот пример работает
[vba]
Код

Set iCell3 = Rows("6:15").Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]
мне надо указать вот так только место 6 и 15 должны стоять переменные которые у меня сами задают этот диапазон

Пример ниже не работает (
[vba]
Код

Set iCell3 = Rows(" & range1 & : & range2 & ").Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]


Каждый сам выбирает правила игры

Сообщение отредактировал Elhust - Вторник, 11.07.2017, 09:55
 
Ответить
СообщениеДобрый день уважаемые специалисты и просто гуру
Вопрос заключается в том что я не могу разобраться как указать диапазон для поиска

Этот пример работает
[vba]
Код

Set iCell3 = Rows("6:15").Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]
мне надо указать вот так только место 6 и 15 должны стоять переменные которые у меня сами задают этот диапазон

Пример ниже не работает (
[vba]
Код

Set iCell3 = Rows(" & range1 & : & range2 & ").Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]

Автор - Elhust
Дата добавления - 11.07.2017 в 09:54
_Boroda_ Дата: Вторник, 11.07.2017, 09:59 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11659
Репутация: 4831 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
А так?
[vba]
Код
Rows(range1 & " :" & range2)
[/vba]
И почто весь код не показываете? И файл?


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеА так?
[vba]
Код
Rows(range1 & " :" & range2)
[/vba]
И почто весь код не показываете? И файл?

Автор - _Boroda_
Дата добавления - 11.07.2017 в 09:59
Elhust Дата: Вторник, 11.07.2017, 10:08 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 158
Репутация: -1 ±
Замечаний: 0% ±

Excel 2010
нет и так тоже type mismthch (не знаю как пишется )
вот файл
К сообщению приложен файл: 4864417.xls(32Kb)


Каждый сам выбирает правила игры
 
Ответить
Сообщениенет и так тоже type mismthch (не знаю как пишется )
вот файл

Автор - Elhust
Дата добавления - 11.07.2017 в 10:08
_Boroda_ Дата: Вторник, 11.07.2017, 10:13 | Сообщение № 4
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11659
Репутация: 4831 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Пробел там у меня затесался лишний
[vba]
Код
Set iCell3 = Rows(range1 & ":" & range2).Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]
К сообщению приложен файл: 4864417_1.xls(36Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеПробел там у меня затесался лишний
[vba]
Код
Set iCell3 = Rows(range1 & ":" & range2).Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]

Автор - _Boroda_
Дата добавления - 11.07.2017 в 10:13
Elhust Дата: Вторник, 11.07.2017, 10:16 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 158
Репутация: -1 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, Спасибо ))) большущее )) а я почему то подумал что на оборот добавить его надо было ))
так не работает )
[vba]
Код

Set iCell3 = Rows(range1 & " : " & range2).Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]
ох уж этот синтаксис VBA ) люблю его ))
Спасибо ещё раз ))


Каждый сам выбирает правила игры
 
Ответить
Сообщение_Boroda_, Спасибо ))) большущее )) а я почему то подумал что на оборот добавить его надо было ))
так не работает )
[vba]
Код

Set iCell3 = Rows(range1 & " : " & range2).Find(iSearchText2$, , xlFormulas, xlPart)
[/vba]
ох уж этот синтаксис VBA ) люблю его ))
Спасибо ещё раз ))

Автор - Elhust
Дата добавления - 11.07.2017 в 10:16
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Rows для метода Find или указать диапазон для метода Find (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!