скопировать строку и вставить на другой лист в первую свободную строчку

Пользователь

Сообщений: 89 Регистрация: 01.01.1970

07.04.2020 13:48:55

Добрый день.
Прошу помочь дописать макрос, финальным шагом в котором, надо с Листа 4 скопировать строку 2 и вставить на Лист "финал" в первую свободную строку в списке. т.е. в конец списка

Спасибо.

Прикрепленные файлы

пример Книга1.xlsm (27.34 КБ)

Ігор Гончаренко

Пользователь

Сообщений: 14576 Регистрация: 01.01.1970

07.04.2020 14:05:27

вот этот мощный макрос, копирующий строку 2 в конец списка листа ФИНАЛ

Код
Sub AddRow2Finish() Rows(2).Copy Worksheets("ФИНАЛ").Cells(Rows.Count, 1).End(xlUp).Offset(1) End Sub

(макрос выполняется при активном листе Лист4)

Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

Katerina Larionova Пользователь Сообщений: 89 Регистрация: 01.01.1970	#3 07.04.2020 14:08:55 Ігор Гончаренко, Огромное человеческое спасибо!!!