hilbert,

Dim myRng As Range
Set myRng = Range("A:A")
With Application.WorksheetFunction
MsgBox .Match(.Max(myRng), myRng, False)
End With

or with a formula:

=MATCH(MAX(A:A),A:A,FALSE)

HTH,
Bernie
MS Excel MVP


"hilbert" wrote in message
...
i have a a column with values, by using a macro i want to get the number
of
the row in which the maximum value of the column is.