Place the value (result) of a formula into a cell rather than the formula.
Sub GetSum() ' using the shortcut approach [A1].Value = Application.Sum([E1:E15]) End Sub