Try:
Function mxinr(c1 As Long, r1 As Long, c2 As Long, r2 As Long) As Double
Dim r, rr As Range
Dim v As Double
Set r = Range(Cells(r1, c1), Cells(r2, c2))
v = Cells(r1, c1).Value
For Each rr In r
If rr.Value > v Then
v = rr.Value
End If
Next
mxinr = v
End Function
--
Gary''s Student
"excel12345" wrote:
>
> I know the absolute offsets of the rows and columns in a seperate sheet
> and want to get the max of that range. For example:
> =Max(CC, RR, cc, rr)
>
> where all the parameters are numbers allowing me to define the range.
>
>
> --
> excel12345
> ------------------------------------------------------------------------
> excel12345's Profile: http://www.excelforum.com/member.php...o&userid=31975
> View this thread: http://www.excelforum.com/showthread...hreadid=517016
>
>