перенос массива на лист Excel

[Danilka]

Доброго времени суток !
необходимо перенести одномерный массив string в столбец листа.
цикл вида

Код: Выделить всё

For Each cell In Selection
cell = newgr(x)
x = x + 1
Next cell

работает ОЧЕНЬ ДОЛГО
я знаю, как перенести массив integer в ячейки:

Код: Выделить всё

TheRange.Value=TempArray

этот способ ОЧЕНЬ БЫСТРЫЙ, но как перенести массив string ?

Заранее благодарен,
Danila

[Danilka]

oops! заработался я ...
туплю
вопрос снят !