Thema: Ermittlung der Kopfzeile nach der Funkion KGRÖSSTE()

Home

Gruppe

UDF

Problem

Wie kann ich die Kopfzeile der mit der Funktion KGRÖSSTE() ermittelten Rangfolge abrufen? Mehrfachtreffer müssen berücksichtigt werden

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.

StandardModule: basMain

Function sRang(rngAll As Range, iPos As Integer)
   Dim wks As Worksheet
   Dim rng As Range
   Dim sTxt As String
   Set wks = Application.Caller.Parent
   For Each rng In rngAll.Cells
      If rng.Value = iPos Then
         sTxt = sTxt & Cells(1, rng.Column) & ", "
      End If
    Next rng
    sRang = Left(sTxt, Len(sTxt) - 2)
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Kgrösste

Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage)	Ergebnis UDF ändert, wenn Tabelle deaktiviert wird
UDF soll nicht auf Daten anderer Dateien zugreifen	vor Ausführung einer UDF Zwischenspeicher "retten&
UDF - Argument ohne " " übergeben möglic	UDF- Beschreibung
Berechnungsdauer einer UDF messen	Hintergrudfarbe ändern??? Finde keine Lösung :-(
Probleme mit IsNumeric, Code per UDF	UDF mittels Ereignis aktualisieren?
UDF, Minuszeichen vor Zahl auswerten	nach Worksheet_Change werden UDF nicht ausgewertet
Excel anhalten bei UDF	UDF
UDF, Rückgabewert Text anstelle Zahl	Aufruf einer UDF, Fehler Objekt erforderlich
SQL in UDF	Werte einer UDF werden nicht aktualisiert
Aufruf von UDF mit Array	UDF: Semikolon vs Komma
UDF, erkennen in welcher Zelle die UDF steht	Probleme mit UDF und Worksheet Ereignissen
Formeln über UDF vergleichen	UDF Verweis checken
UDF	Intellisense bei User defined functions (UDF)
VBA "Find" in UDF	UDF-Funktionen in eigener Kategorie
UDF Function Variable Info erstellen	UDF, optionaler Parameter als Range, IsEmpty?
UDF verschiedene Bereiche ändern	Makro aus UDF starten
Reihenfolge von UDF's	UDF/ Berechnung Zuschlagszeiten
AddIn UDF in anderem VBA-Project verwenden	UDF und Array bzw. Matrix
Kgrösste bzw. Vergleich doppelte vermeiden	KGrösste mit SVerweis ?
Top 3 Werte je Filterkriterium (KGRÖSSTE)	KKleinste KGrösste gepaart mit Links() Funktion
2 Größter Wert ohne Bereich (KKGRÖSSTE)	UDF die Texte in Zahlen umwandelt
KGRÖSSTE() mit Wildcard	Summewenns UDF über mehrere Tabellenblätter
Funktionsargumente für UDF's	VBA KGRÖSSTE, ZÄHLENWENN Formel in Zelle schreiben
UDF Reihenfolge Übergabeparamter führt zu #WERT	Kgrösste von Summen/ Sverweis aus Summe
10 KGrösste mit Autofilter	Verweiss + 3 Kriterien und Kgrösste Ergebniss