Цитата Александр_Цыпкин@vk:
|
в буфер копировалась информация »
|
«буфер» — это рабочий лист «Буфер» приложенной рабочей книги?
Цитата Александр_Цыпкин@vk:
|
Возможна ли модернизация существующего макроса. »
|
Закомментируйте строку:
Код:
'ActiveCell.EntireRow.Copy Worksheets("Буфер").Rows(2)
и добавьте после этой строки следующее:
Код:
ActiveCell.EntireRow.Copy
Worksheets("Буфер").Rows(2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
Такое Вас устроит?
