Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Макрос Excel to Excel (http://forum.oszone.net/showthread.php?t=257852)

max_g 04-04-2013 13:50 2125595

Макрос Excel to Excel
 
Вложений: 1
Всем доброго дня.
прошу помощи в написании макроса.
заранее благодарен за любую помощь.

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

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

Delirium 04-04-2013 14:08 2125609

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

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

max_g 05-04-2013 13:36 2126228

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

Delirium 05-04-2013 17:47 2126380

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

Последняя пустая строка находится очень просто: http://www.excel-vba.ru/chto-umeet-e...te-cherez-vba/
Код:

lLastRow = Cells(Rows.Count,1).End(xlUp).Row
Соответственно, если на листе 321 надо выделить и вставить последний заказ, достаточно сделать lLastRow-1 = последний заказ.

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

max_g 05-04-2013 17:58 2126387

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

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


Время: 19:46.

Время: 19:46.
© OSzone.net 2001-