Помогите пожалуйста написать текст программы в VBA (в Экселе) с помощью условного оператора If

Question

Помогите пожалуйста написать текст программы в VBA (в Экселе) с помощью условного оператора If

Помогите пожалуйста написать текст программы в VBA (в Экселе) с помощью условного оператора IfУсловие задачи: Определить знак числа, если А1 и В1 положительны, то в С1 написать "+" если отрицательные, то в С1 написать "-" если разные, то в С1 написать "+/-" если оба нуля, то в С1 написать "0"

Гость

Ответ(ы) на вопрос:

Accepted Answer

Sub main() If Range("A1").Value & Range("B1").Value > 0 Then Range("C1").Value = "+" End If If Range("A1").Value And Range("B1").Value < 0 Then Range("C1").Value = "-" End If If Range("A1").Value <> Range("B1").Value Then Range("C1").Value = "+/-" End If If Range("A1").Value & Range("B1").Value = 0 Then Range("C1").Value = "0" End If End Sub