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