Excel VisualBasic Script

Sub GetSum()                    ' using the shortcut approach
    [A1].Value = Application.Sum([E1:E15])
End Sub