Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Vorletzter Wert usw.

Vorletzter Wert usw.
21.06.2008 20:22:30
Rudolf Perkams

Hallo Excel-Freunde,
ich habe bei meiner Suche zwar Formeln für das Finden des letzten Wertes einer Spalte gefunden, aber wie ist es, wenn man den vorletzten, den drittletzten Wert usw. haben will?
Ich habe beispielsweise folgende Werte in zwei Spalten:
Person A 56
Person B 23
Person C 88
Person D (leer)
Person E 33
Ich möchte nun mittels einer Formel die Person erhalten, die den vorletzten Wert in einer Spalte hat - im Beispiel also Person C (88)
Gruss
Rudi

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vorletzter Wert usw.
21.06.2008 21:03:07
Christian
Hallo Rudi,
als Ansatz für den vorletzten Wert:
Tabelle2

AW: Vorletzter Wert usw.
21.06.2008 21:28:21
Daniel
Hi
das mit Formeln zu ermitteln könnte aufwendig werden.
diese Benzuterdefinierte Funktion gibt dir die Zeilen-Nr zurück, in der sich der x-Letzte Wert eines einspaltigen Zellbereichs befindet:


Public Function LetzerWertInBereich(Spalte As Range, Optional Pos As Long = 1) As Variant
Dim arrSpalte
Dim i As Long
Dim Counter As Long
arrSpalte = Spalte.Value
For i = UBound(arrSpalte, 1) To 1 Step -1
If arrSpalte(i, 1) <> "" Then Counter = Counter + 1
If Counter >= Pos Then Exit For
Next
LetzerWertInBereich = i
End Function


um jetzt in deinem Beispiel zum Ergebnis zu kommen, müsstest du folgende Formel verwenden:
(angenommen, deine Werte stehen im Zellbereich A1:B5)
=Index(A1:A5;LetzerWertInBereich(B1:B5;2);1)
Gruß, Daniel
https://www.herber.de/bbs/user/53244.xls

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige