=sum als makro

Sub SummenBildung()
Range("E45).Select
ActiveCell.FormulaR1C1 = "=SUM(R[-8]C:R[-2]C)"
End 

Sub
...jedoch erscheint, wenn ich auf die Zelle klicke, die diese Summe summiert (E45), dann immer   _
_
noch die Formel, was ich nicht unbedingt möchte. Weiß jemand ob sowas auch mit folgender oder  _
anderer Funktion geht:

Sub SummenBildung()
Range("e45") = Application.WorksheetFunction.Sum("e37:e43")
Range("e45") = Application.Volatile
End 

Sub
Dabei ist die dynamische Anpassung sehr wichtig, da sich Zahlenwerte ja ändern können.
Vielen Dank im Voraus