Автоматическая замена формул значениями

[lordneo]

Добрый день! Помогите решить такую проблемку:
Необходимо, чтобы при заполнении ячейки формулы, расположенные в той же строке, но на другом листе автоматически заменялись на их текущие значения. И так для каждой последующей строки.
Записываю макрос (Копировать-Специальная вставка), но он привязывается к конкретным ячейкам, а не к той строке в которой ввожу данные

[doober]

Возможно так.Этот код в событии Листа1
Работает на Лист2

Private Sub Worksheet_Change(ByVal Target As Range)
  Sheets("Лист2").Rows(Target.Row) = Sheets("Лист2").Rows(Target.Row).Value
End Sub

[lordneo]

Большое спасибо. Практически то, что надо.