Цикл для TextBox - VB

Формулировка задачи:

Подскажите, пожалуйста, как правильно записать цикл для TextBox?
На листе Excel создан бланк с текстом и рисунками. На рисунке расставлены 23 TextBox-а.
Нужно заполнить их данными из 2-х массивов. Вариант:
ActiveSheet.Shapes("Text Box 258").Select
Selection.Characters.Text = dan1(1) & "/" & dan2(1)
.. и т.д. – нормально работает, но как сделать цикл?
Нашла на вашем форуме подсказку и написала:
n = 0
For iCount = 257 To 279
ActiveSheet.Shapes("Text Box" & iCount).Value = dan1(n) & "/" & dan2(n)
n = n + 1
Next iCount
Выдает «Компонент с указанным именем не найден»
Подскажите, как это сделать.

Решение задачи: «Цикл для TextBox»

textual
                            Листинг программы 
                        

                            <font color="blue">Dim</font> tb <font color="blue">As</font> Excel.TextBox
 ...
 <font color="blue">For</font> iCount = ...
    <font color="blue">Set</font> tb = ActiveSheet.Shapes(<font color="teal">"Text Box "</font> & iCount).OLEFormat.<font color="blue">Object</font>
    tb.Text = ...
 <font color="blue">Next</font> iCount
                        