Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Zelle mit Spalte Vergleichen und Treffer ausgeben

Forumthread: Zelle mit Spalte Vergleichen und Treffer ausgeben

Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:01:51
Stephan Roth
Hallo allerseits,

ich nutze Excel 2016 Prof. Plus.

Ich habe in Spalte A eine Artikel ID. In Spalte B stehen zugehörig zu A kommagetrennt Zahlen. Dann habe ich eine Spalte F, wo in jeder Zelle eine Zahl steht.

Nun möchte ich in Spalte C zu jeder Artikel ID ausgeben, welcher Wert aus der zugehörigen Zelle B sich in Spalte F findet.

Wie würde denn da die Formel für Spalte C heißen, bzw. wie würde ein Macro aussehen?

Die KIs scheinen komplett überfordert zu sein, ich aber leider auch.

Vielen lieben Dank für die Hilfe
Stephan
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:06:30
SF
Hola,
=TEIL(B2;SUCHEN(F2;B2);1)

Gruß,
steve1da
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 14:14:00
Daniel
Hi

In Excel 365 mit dieser Formel in C2:

=LET(A;TEXTTEILEN(B2;",");TEXTVERKETTEN(",";1;FILTER(A;ZÄHLENWENNS(F:F;A);"---")))



In deiner Excelversion kommt diese Function in ein allgemeines Modul
Function xxx(txt as String, rng as Range) as String

Dim x
For each x in split(txt, ",")
If worksheetfunction.Countif(rng, x) then xxx = xxx & "," & x
Next
If xxx > "" then xxx = Mid(xxx, 2)
End Function

Und dann in C2 die Formel
=xxx(C2;F:F)


Beim Funktionsnamen darfst du kreativer sein.
Achtung, den Code habe ich noch nicht getestet oder auf Tippfehler geprüft (geht nicht am Handy)

Gruß Daniel
Anzeige
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 21:08:53
Stephan Roth
Hallo Daniel,

krass, danke!
Stephan
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 20:05:47
Piet
Hallo

eine dazu passende Makro Version würde so aussehen.
Sub Category()

Dim AC As Range, lz1 As Long, ID As Variant
lz1 = Cells(Rows.Count, 1).End(xlUp).Row
For Each AC In Range("B2:B" & lz1)
If InStr(AC, ",") = 0 Then ID = AC Else _
ID = Left(AC, InStr(AC, ",") - 1)
AC.Cells(1, 2).Value = "'" & ID & "/" & AC.Cells(1, 5)
Next AC
End Sub

mfg Piet
Anzeige
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:26:15
Stephan Roth
Hallo und vielen Dank! Es müsste mit der Spalte F (F:F) verglichen werden.

Wenn ich das F2 aber durch F:F ersetz, dann gibt es einen Fehler #WERT!:

Wie könnte man dies anpassen?

Vielen Dank!
Stephan
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:27:31
SF
Dann lade mal bitte eine Beispieldatei mit Wunschergebnis hoch.
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:32:53
Stephan Roth
Vielen Dank!

Hier das Beispiel:

https://www.herber.de/bbs/user/179983.xlsx
Anzeige
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:45:44
Stephan Roth
Ergebnis Zeile 1 in C2 = 3301
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 13:48:18
SF
Und in C4 dann zB 1764 und 3303? Weil beide Werte kommen in Spalte F vor.
Wenn ja, wird das mit Formeln bei dem Konstrukt schwierig bis unmöglich.
AW: Zelle mit Spalte Vergleichen und Treffer ausgeben
08.01.2026 19:31:34
Stephan Roth
Vielen Dank für Deine Rückmeldung.
Das erste Ergebnis würde ausreichen. Ich benötige nur irgendeine Zahl aus der Spalte, die übereinstimmt.
Anzeige

Forumthreads zu verwandten Themen

Anzeige