Среди чисел в ячейках B5…B27 найти номер последнего элемента, равного числу A
Создать макрос с использованием цикла Do

Спасибо огромное

Пожалуйста

Sub aaa()    a = CInt(InputBox("Введите А"))    i = 27    Do While i >= 5        If Cells(i, 2) = a Then            MsgBox "Значение найдено в строке " + CStr(i)            Exit Sub        End If        i = i - 1    Loop    MsgBox "Значение не найдено"End Sub