Как составить все возможные десятизначные числа из трех цифр.

[businka]

Здравствуйте.
Помогите, пожалуйста, экономисту запрограммировать в Excel все возможные комбинации шоков. Когда-то в лохматом году решала подобную задачу в бэйсике, но сейчас убей - не вспомню. 
Суть задачи: есть 10 шагов. На каждом шаге возможное значение 1, 0 или -1.
То есть надо создать десятизначные числа со всеми возможными комбинациями 1 0 и -1.
Всего их получается 3^10, перебором это сделать нереально.

P.S. просмотрела все похожие темы на форуме, но того, что надо - не нашла...

[MCH]

покажите на примере, что хотите получить в результате
Решить можно макросом/формулами, как предпочтительнее?
3^10 = 59049, Вам все 59тыс вариантов нужно?

Макрос типа такого:

Код Выделить Развернуть

Sub businka()
Dim i&, j&, m&
For i = 0 To 3 ^ 10 - 1
    m = i
    For j = 1 To 10
        Cells(i + 1, j) = m Mod 3 - 1
        m = m \ 3
Next j, i
End Sub