u can use formula in VBA also like this, it's better than looping
Code:
MsgBox Application.WorksheetFunction.Sum(Range("A1:B100"))
it returns SUM of range A1:B100