Необходимо перенести формулу ИЗ ячейки В макрос - VBA

Формулировка задачи:

Т.е например в ячейке написали х+у во второй и третьей ячейке значения икса и игрика Каким оператором можно засунуть это формулу из ячейки в vba, чтобы далее можно было в вба работать с этой формулой. рассчитать например. необходимо именно такая логика, для того, чтобы удобно менять формулы, а не лесть в код. И напишите, пожалуйста, кратенький пример.

Решение задачи: «Необходимо перенести формулу ИЗ ячейки В макрос»

textual
                            Листинг программы 
                        

                            Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 1 Then
    Application.EnableEvents = False
    Range("B1").Value = Evaluate(Range("A1").Value)
    Application.EnableEvents = True
  End If
End Sub
                        