User Defined Function - Using Cell Range

[Guest]

Hello,
I have a question about creating a user defined function...

I want it to make some calculations based off of static cell ranges. I was
hoping I could use either a named range, or just type in a static range in
the function.

Like, how would I do WorksheetFunction.SUM(RANGE) in a UDF?

 

[RB Smissaert]

Function SumRange(rng As Range) As Double

SumRange = Application.WorksheetFunction.Sum(rng)

End Function


Sub test()

MsgBox SumRange(Range(Cells(1), Cells(3, 2)))

End Sub


RBS

 

[Guest]

something like this will give the sum of A1:A10 in Sheet1

Dim dblSum As Double
dblSum = WorksheetFunction.Sum(Sheets("Sheet1").Range("A1:A10"))

to use a named range, you can do it this way

dblSum = WorksheetFunction.Sum(Range("NamedRange"))

 

[Guest]

Thanks - the Sheets("Sheet1").Range("A1:A10") did the trick!!