Поиск значения в обратном порядке

[Sergey112233]

Уважаемые форумчане.
Для поиска значения в столбце сверху вниз пользуюсь :
Set poz = [h:h].Find(What:=iValue, LookAt:=xlWhole)

Подскажите, пожалуйста,
а как задать поиск значения в столбце снизу вверх, чтобы выводилось первым последнее значение.
Например
1111
2222
3333
1111
Надо найти сначала последнее значение 1111

[IgorGO]

в справке по Find написано:
XlSearchDirection Enumeration
Specifies the search direction when searching a range.
Version Information
Version Added: Excel 2007

Name Value Description
xlNext 1 Search for next matching value in range.
xlPrevious 2 Search for previous matching value in range.

[Sergey112233]

IgorGO, спасибо!
У меня 2003
Выбрал еще раз
SearchDirection:=xlPrevious
Получилось!

А поиск по признаку Далее в направлении поиска снизу вверх?
Например
1111
2222
3333
4444
2222
5555
2222

Надо найти в направлении снизу вверх 2222 второе значение снизу

[kuklp]

Почитайте справку по FindPrevious, FindNext.

[Sergey112233]

kuklp, спасибо.

[EducatedFool]

Sub test()
    iValue = 4
    Dim poz1 As Range, pos2 As Range
    
    ' ищем первое с конца
    Set poz1 = Range("h:h").Find(iValue, , , xlWhole, , xlPrevious)
    
    ' ищем второе с конца (начиная искать с первого найденного)
    Set poz2 = Range("h:h").Find(iValue, poz1, , xlWhole, , xlPrevious)
    
    Debug.Print poz2.Address
End Sub

или как посоветовал kuklp

Sub test()
    iValue = 4
    Dim pos2 As Range
    Set poz2 = Range("h:h").FindPrevious(Range("h:h").Find(iValue, , , xlWhole, , xlPrevious))
    
    Debug.Print poz2.Address
End Sub

[SAS888]

Хочу обратить внимание на один нюанс метода Find.
Возьмем пример из поста №1. Если использовать предлагаемый код поиска (сверху вниз), и если значения в искомом столбце начинаются с 1-й строки, то результатом поиска будет именно выделенная автором вопроса ячейка. Т.е. поиск начинается со 2-й строки. И если удовлетворяющее условиям поиска значение находится в 1-й строке, то оно будет найдено в последнюю очередь.

[Sergey112233]

Уважаемые форумчане.
Ваши советы и приведенные примеры мне очень помогли разобраться в вопросе и Help стал более "дружественнее" выглядеть.
Спасибо!
Попробую адаптировать к своей задаче.