Clever-Excel-Forum

Hallo zusammen und einen schönen Abend!

Ich stehe vor folgendem Problem in folgender Tabelle:
A      B C
1  18     21 24
2 19   22    25
3 20   23 26
4  1-2-3 2-3-4 5-6-7
5 27 30 33
6 28 31 34
7 29 32   35
8 8-9-1 3-8-7 5-2-8

Ausgegeben werden soll jeweils der 1. bis 3. Wert oberhalb der fett markierten Werte. Je nach dem nach welchem ich suche.

Zum Beispiel :
Suche: 8-9-1 (A8)
Ergebnis 1. Wert: 27 (A5)

Oder

Suche: 2-3-4 (B4)
Ergebnis 2. Wert: 22 (B2)

Vielen Dank im Vorraus Smile

Hallo,

falls es VBA sein darf, wie wäre es so:

Code:
Sub such()

Dim rngFund As Range, sSuch As String

sSuch = InputBox("Wonach soll gesucht werden", , "1-2-3")

Set rngFund = ActiveSheet.Cells.Find(sSuch, LookIn:=xlValues, lookat:=xlWhole)

If rngFund Is Nothing Then

   MsgBox "Der Suchbegriff" & vbLf & sSuch & vbLf & "konnte nicht gefunden werden."

Else

   MsgBox rngFund.Offset(-3, 0).Value & vbLf & _

            rngFund.Offset(-2, 0).Value & vbLf & _

            rngFund.Offset(-1, 0).Value

End If

End Sub

Grüße, Ulrich

Hey losgehts,

Vielen Dank. Jedoch kann ich VBA noch weniger.
Lieber wäre mir da eine Formel-basierte Lösung.
Gibt es da etwas?

Moin

Eine Formel-Lösung.
Tabelle1

	A	B	C	D	E	F	G	H	I	J
1	18	21
2	19	22
3	20	23
4	1-2-3	2-3-4			8-9-1	1	8,0001	5	1	27
5	27	30			2-3-4	2	4,0002	2	2	22
6	28	31
7	29	32
8	8-9-1	3-8-7

Formeln der Tabelle

Zelle	Formel
G4	=AGGREGAT(14;6;ZÄHLENWENNS(E4;$A$1:$B$8)*(ZEILE($A$1:$B$8)+SPALTE($A$1:$B$8)%%);1)
H4	=QUOTIENT(G4;1)+F4-4
I4	=REST(G4;1)*10^4
J4	=INDEX($A$1:$B$8;H4;I4)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Hey Shift del,

Vielen Dank, das klappt!

Das Thema kann geschlossen werden.

Vg

tarantino15

losgehts

tarantino15

shift-del

tarantino15