This function works if I pass it a list of cell addresses, like =Rangesum(C4,D4,E4)
Function RangeSum(ParamArray list())
Dim i As Integer
RangeSum = 0
For i = 0 To UBound(list)
RangeSum = RangeSum + list(i)
Next i
But it gets a value error if I call it with a range, like "RangeSum(C4:E4)"...