ich habe das Problem, das ich gerne die Position (Zeilennummer genügt) eines Maximalwertes in einem Datensatz mit mehreren Spalten hätte.
Mit den Funktionen VERGLEICH und MAX ist das nur für eine Spalte möglich.
Hat jemand eine Idee?
Gruß
Alex
=WENN(MAX(B:B)=MAX(B:D);VERGLEICH(MAX(B:B);B:B;FALSCH);WENN(MAX(C:C)=MAX(B:D);
VERGLEICH(MAX(C:C);C:C;FALSCH);WENN(MAX(D:D)=MAX(B:D);VERGLEICH(MAX(D:D);D:D;FALSCH))))
Function ZeilenMax(Bereich As Range) As String
Dim Maxwert, Zelle As Range
Maxwert = Application.WorksheetFunction.Max(Bereich)
For Each Zelle In Bereich
If Zelle.Row > ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1 Then Exit For
If Zelle.Value = Maxwert Then
If ZeilenMax = "" Then
ZeilenMax = ZeilenMax & Zelle.Row
Else
ZeilenMax = ZeilenMax & " " & Zelle.Row
End If
End If
Next Zelle
End Function
Formelbeispiel in Tabelle:
=ZeilenMax(C:D)