Создание пользовательской функции в Excel

[Аcmrf]

Добрый день!
Помогите, пожалуйста написать пользовательскую функцию в Excel.
У самой никак не получается.
Дано: 3 ячейки с данными:a,b,c, нужно вывести вектор.
Вектор {x1,x2,x3}
Функция:
Если a>=0, тогда x1=1
если a<0, тогда x1=0
Если b>=0, тогда x2=1
если b<0, тогда x2=0
Если c>=0, тогда x3=1
если c<0, тогда x3=0
Помогите, очень нужно.

Вот, как я начала
Sub Test()
a = 1
b = 2
c = 3
x = (if a >= 0 then x1 = 1 if a < 0 then x1 = 0,if b >= 0 then x2 = 1 if b < 0 then x2 = 0,if c >= 0 then x3 = 1 if c < 0 then x3 = 0)
End Sub

но это все неправильно

[Казанский]

Function Test(a, b, c)
Test = Array(-(a >= 0), -(b >= 0), -(c >= 0))
End Function

Вводить как формулу массива в 3 соседние ячейки (F1 - формула массива).

[Аcmrf]

Простите, не очень поняла, как аргументы вводить.

[Аcmrf]

Функция не работает.

[Аcmrf]

Помогите, пожалуйста, разобраться, потому я не понимаю, как по этой функции у меня будут выводиться вектор в ячейке Вектор {x1;x2;x3}. Эту функцию надо доработать?

[Hugo121]

Нормально всё работает.
Код в модуль, формулу сразу в 3 смежные ячейки одной строки, вводить как ФОРМУЛУ МАССИВА