Find поиск с конца (с последней ячейке на листе)

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Find поиск с конца (с последней ячейке на листе) (Макросы/Sub)

Elhust

Дата: Вторник, 11.07.2017, 12:19 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 184

Репутация: -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 (33.5 Kb)

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

Сообщение отредактировал Elhust - Вторник, 11.07.2017, 12:20

Ответить

_Boroda_

Дата: Вторник, 11.07.2017, 12:41 | Сообщение № 2

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16674

Репутация: 6479 ±

Замечаний: 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