simple function

[JamesBollard]

Hi

I'm new to access vba but I need to write a function to find the highest value in a field. Anyone know what this would be? Help much appreciated.

Cheers

James

 

[JohnYingling]

Function GetMax(array() as ...) as long
Dim lngMax as long
Dim I as long

lngMax = array(0)
For I = 1 to Ubound(array)
    if array(I) > lngMax) then
        lngMax = array(I)
    End if
Next
GetMax = lngMax

http://WWW.VBCompare.Com

 

[MichaelRed]

If it is a 'field' in a table, just use an aggregate query, with the field and the (SQL) function MAX.

MichaelRed
mred@att.net

There is never time to do it right but there is always time to do it over