Предмет: Информатика, автор: bladg13

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

Ответы

Автор ответа: Аноним
0
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
Автор ответа: bladg13
0
Спасибо огромное
Автор ответа: Аноним
0
Пожалуйста
Похожие вопросы
Предмет: История, автор: ударница61
Предмет: Математика, автор: bucnewa