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