Помогите доделать макрос в Екселе - VB

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

Доброго времени суток всем! Поставили вот такую задачу:

С первыми двумя пунктами справился, а вот с добавлением позиций из "базы" в "прайс" никак :(

Может подскажите какие-нибудь идеи? Заранее огромное спасибо!

Решение задачи: «Помогите доделать макрос в Екселе»

textual
                            Листинг программы 
                        
                            <font color="blue">Next</font> x
<font color="00AA00">'====end=добавлено=====</font>