Office: Zeilennummer eines Maximalwerts ermitteln

Hallo,
ich hab mal eine Frage, wie kann ich die Zeilennummer des Maximalwerts ermitteln?
Den Maximalwert hab ich ermittelt, aber wie komme ich an die Zeilennummer? geht das vielleicht irgendwie mit .Row??

Code:

Private Sub CommandButton6_Click()
'Maximal wert suchen
Dim lng As Long
Dim wert As String

    With Sheets("Tabelle1").Activate

        lng = Range("A65536").End(xlUp).Row
        wert = Application.Max(Range(Cells(lng, 3), Cells(6, 3)))
    End With

End Sub

Vielen Dank für Eure hilfe

 

Hi Heinz,

dazu kann man Application.Match (= Tabellenfunktion VERGLEICH) verwenden:

Code:

Private Sub CommandButton6_Click()
    Dim lng As Long
    Dim wert As Double
    With Sheets("Tabelle1")
        'Maximalwert
        wert = Application.Max(.Range(.Cells(6, 3), .Cells(.Range("A65536").End(xlUp).Row, 3)))
        ' Zeile des Maximalwertes
        lng = Application.Match(wert, .Range(.Cells(6, 3), _
            .Cells(.Range("A65536").End(xlUp).Row, 3)), 0) + 5
    End With
End Sub

Bis später,
Karin