Evaluate() an array

Hi,

Please don't post the same question twice, this is a duplication of http://www.excelforum.com/excel-prog...-an-array.html

Also, please try not to cross post, if you do, it is considered polite to include a link to where else you have asked the question: http://www.mrexcel.com/forum/excel-q...ate-array.html

I was able to solve this with some help:

Function EvaluS(S())
Dim i As Long
For i = LBound(S) To UBound(S)
EvaluS = EvaluS + Evaluate(S(i))
Next i
End Function