Задача:
В клетке В2 сделайте сообщение о том, какое число записано в клетку А2 – положительное, отрицательное или ноль.
Для ее решения используется простая лесенка If Else If:
Исходный код:
1 2 3 4 5 6 7 8 9 10 11 |
Sub Button1_Click() If (Cells(2, 1).Value > 0) Then Cells(2, 2).Value = "Больше нуля" Else If (Cells(2, 1).Value < 0) Then Cells(2, 2).Value = "Меньше нуля" Else Cells(2, 2).Value = "Равно нулю" End If End If End Sub |
Пример работы программы: