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

Вход

Регистрация

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

 

= Мир MS Excel/Find поиск с конца (с последней ячейке на листе) - Мир MS Excel

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

Excel 2010
Добрый день уважаемые специалисты и просто гуру Excel
Не могу дойти до поиска с конца листа он с первой ячейки ищет A1 а как сделать на оборот ... где то читал что можно но не помню как ... и ссылку не помню ... прошу помощи в подсказке find next не подойдёт для задачи нужно с первого входа точное совпадения производить к сожалению или к счастью пока не знаю.
На сколько понимаю на это влияет диапазон....
[vba]
Код

Set iCell3 = .Cells.Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell3.Address & "  От начала листа"

Set iCell4 = Rows(range1 & ":" & range2).Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell4.Address & "  От выделенного диапазона"

Set iCell6 = .UsedRange.Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell6.Address & "  От конца листа"
[/vba]
Благодарю за внимание
К сообщению приложен файл: 6950168.xls(34Kb)


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

Сообщение отредактировал Elhust - Вторник, 11.07.2017, 12:20
 
Ответить
СообщениеДобрый день уважаемые специалисты и просто гуру Excel
Не могу дойти до поиска с конца листа он с первой ячейки ищет A1 а как сделать на оборот ... где то читал что можно но не помню как ... и ссылку не помню ... прошу помощи в подсказке find next не подойдёт для задачи нужно с первого входа точное совпадения производить к сожалению или к счастью пока не знаю.
На сколько понимаю на это влияет диапазон....
[vba]
Код

Set iCell3 = .Cells.Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell3.Address & "  От начала листа"

Set iCell4 = Rows(range1 & ":" & range2).Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell4.Address & "  От выделенного диапазона"

Set iCell6 = .UsedRange.Find(iSearchText2$, , xlFormulas, xlWhole)
MsgBox iCell6.Address & "  От конца листа"
[/vba]
Благодарю за внимание

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

2003; 2007; 2010; 2013 RUS
Так нужно?
[vba]
Код
Set iCell6 = .UsedRange.Find(iSearchText2$, , xlFormulas, xlWhole, , xlPrevious)
[/vba]


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
[vba]
Код
Set iCell6 = .UsedRange.Find(iSearchText2$, , xlFormulas, xlWhole, , xlPrevious)
[/vba]

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

Excel 2010
_Boroda_, Бесконечно благодарю hands и прошу прощения :( .. у меня msdn заблокирован (


Каждый сам выбирает правила игры
 
Ответить
Сообщение_Boroda_, Бесконечно благодарю hands и прошу прощения :( .. у меня msdn заблокирован (

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

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