Здравствуйте.
Скажите, пожалуйста, как вставить данные из активного листа, из строки, в которой находится активная ячейка, на другой лист?
Макрос копирует данные из строки с активной ячейкой из первой ячейки во второй лист:
Sub Макрос1()
Worksheets(2).Range("A1").Value = ActiveCell.EntireRow.Cells(1).Value
End Sub