Function SumofSquares(N) 'SumSq initial amount should be zero 'SumSq will add up N terms with this "FOR/NEXT" loop SumSq = 0 For i = 1 To N SumSq = SumSq + i ^ 2 Next SumofSquares = SumSq End Function