Макрос Excel to Excel

[max_g]

Всем доброго дня.
прошу помощи в написании макроса.
заранее благодарен за любую помощь.

во вложении файл варриант7 основной.
при нажатии на макрос "сформировать" должен заполнятся Word шаблон, с ним я разобрался более мене, но также должен формироваться Excel"евский файл "Заказ"
с листа 321 файла варриант7 данные нужно перенести на лист 123 файла заказ в ближайшую пустую строку начиная с 3, тк во второй потом будет нужна сумма. собственно шаблон для суммы в архиве и лежит.

но на данном этапе я вообще не могу заставить макрос адекватно перенести значение ячеек, не говоря уже о том чтоб выискивать первую пустую строку.

[Delirium]

Завтра гляну, если раньше не помогут.

Завтра гляну, если раньше не помогут.

[max_g]

буду очень благодарен

[Delirium]

Ну если вкратце. С шаблоном Word все делается намного проще и удобней. Делается операция "Слияние" в Word. Посмотри хелп к этой опции, она очень простая. В ней Excel выступает в роли базы данных, и вставляешь в шаблон поля из Excel. Потом можно формировать документ по любой записи из Excel.
По поводу переноса ячеек сейчас гляну.

Последняя пустая строка находится очень просто: http://www.excel-vba.ru/chto-umeet-excel/kak-opredelit-poslednyuyu-yachejku-na-liste-cherez-vba/
lLastRow = Cells(Rows.Count,1).End(xlUp).Row
Соответственно, если на листе 321 надо выделить и вставить последний заказ, достаточно сделать lLastRow-1 = последний заказ.

Дальше. Запускаем создание макроса, выделяем строку, открываем нужный документ, вставляем строку. Смотрим код. Добавляем выше код для нахождения последней пустой строки и переделываем созданный макрос на вставку в нужную строку. И в принципе все :)

[max_g]

как раз с word все работает,

надо чтоб данные ввел на кнопочку нажал и документЫ получил :)
а если слияние. то не забыть сохранить, не забыть имя поменять, ...