=ИНДЕКС($H$1:$H$13;СТРОКА())  
Аналогично для СЦЕПИТЬ().

Наверное я что то не так делаю, но у меня в меню вставка нет пункта таблица.

Теперь дошло.  
Но к сожалению у меня Oфис 2003.

Без Smart таблиц или списков :

Сразу извиняюсь за молчание, пришлось срочно уехать.  
vikttur огромное спасибо за подсказку, все работает, однако вариант С.М. мне больше по душе, но понять бы как это устроено, чтобы с примера применить в своем документе.

доброго времени суток!  
Еще раз всем большое спасибо за помощь.  
Я обращаюсь к "С.М."- Ваш макрос, это то, что надо.  
Я приспособил его для своей таблицы, но возникла необходимость модернизации.  
Я в VBA ничего не понимаю, поэтому обращаюсь к Вам с помощью в следующем: необходимо, чтобы формулы автоматически растягиваись не только в столбцах J и K но и в столбцах I;L;M  
Большое спасибо!