Количество итераций в MS Office 2007

 Заглянул сегодня в справку MS Excel 2007 в раздел "Технические характеристики и ограничения вычислений" и увидел любопытную информацию (для себя, по крайней мере) , что количество итераций может быть не более чем 32 767 штук!  Сразу попробовал такой элементарный код, который последовательно вносит единички в каждую строчку первого столбца:

Sub iteratsii()

Dim i As Integer

    Sheets(1).Activate

        For i = 1 To 32767

            Cells(i, 1).Value = 1

        Next i

End Sub

Результат получился ожидаемым:



Если же вместо 32 767 поставить 32 766, то процедура выполняется нормально.

Таким образом получается, что если нужно будет выполнить операцию где цикл выполняется с проходками более 32 767 раз, то нужно будет пользоваться другими методами (массивы и т.д.).