zwei Spalten vergleichen und 3. Zelle zurückgeben
Hallo Forum,
folgende kleine Sache möchte ich realisieren:
Ich habe zwei Tabellenblätter:
Blatt1:
Spalte A Werte "Nummer"
Blatt 2:
Spalte B Werte "Nummer", Spalte D Werte "Zeit"
Ich möchte jetzt:
Wenn Zelle aus Blatt1 A1 in Blatt2 Spalte B vorkommt den Wert aus Blatt 2 Spalte D ausgeben
Ich hab schon mit sverweis rumprobiert aber irgendwie funktioniert das nicht.
Habt Ihr ne Lösung parat? Währe extrem Dankbar!
Gruß Markus
folgende kleine Sache möchte ich realisieren:
Ich habe zwei Tabellenblätter:
Blatt1:
Spalte A Werte "Nummer"
Blatt 2:
Spalte B Werte "Nummer", Spalte D Werte "Zeit"
Ich möchte jetzt:
Wenn Zelle aus Blatt1 A1 in Blatt2 Spalte B vorkommt den Wert aus Blatt 2 Spalte D ausgeben
Ich hab schon mit sverweis rumprobiert aber irgendwie funktioniert das nicht.
Habt Ihr ne Lösung parat? Währe extrem Dankbar!
Gruß Markus
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 85875
Url: https://administrator.de/forum/zwei-spalten-vergleichen-und-3-zelle-zurueckgeben-85875.html
Ausgedruckt am: 23.12.2024 um 08:12 Uhr
10 Kommentare
Neuester Kommentar
salü!
ich frage jetz ma ganz dumm in den raum was meinste mit ausgeben ?
das ganze als kleines makro zu schreiben steht ausser frage? ansonsten könntest du folgendes beispiel einmal anwenden, welches dir die werte "Zeit" aus spalte D des zweiten tabellenblatts als msgbox ausgibt:
wenn ich völlig schief liegen sollte - so tut es mir leid
edit: ok ich stand aufm schlauch, war wohl einfach simpler zu lösen.. lass es trotzdem ma im raum stehen
gruss tacker
ich frage jetz ma ganz dumm in den raum was meinste mit ausgeben ?
das ganze als kleines makro zu schreiben steht ausser frage? ansonsten könntest du folgendes beispiel einmal anwenden, welches dir die werte "Zeit" aus spalte D des zweiten tabellenblatts als msgbox ausgibt:
Sub test()
Dim zeile
Dim tb1
Dim tb2
zeile = 1
Set tb1 = Excel.ActiveWorkbook.Worksheets(1)
Set tb2 = Excel.ActiveWorkbook.Worksheets(2)
Do While tb1.Cells(zeile, 1) <> ""
If tb1.Cells(zeile, 1) = tb2.Cells(zeile, 2) Then
MsgBox (tb2.Cells(zeile, 4))
End If
zeile = zeile + 1
Loop
End Sub
wenn ich völlig schief liegen sollte - so tut es mir leid
edit: ok ich stand aufm schlauch, war wohl einfach simpler zu lösen.. lass es trotzdem ma im raum stehen
gruss tacker
@Arafat
Hi,
warum verwendest du nicht einfach wenn?
Wenn A1 = Tabelle2!B1, gib Tabelle2!D1 aus, ansonsten nix.
Gruß
Günni
Hi,
warum verwendest du nicht einfach wenn?
=WENN(A1=Tabelle2!B1;Tabelle2!D1;"")
Wenn A1 = Tabelle2!B1, gib Tabelle2!D1 aus, ansonsten nix.
Gruß
Günni
Hallo Arafat!
Tatsächlich ist die 0 (oder, nach Belieben, auch FALSCH) erforderlich, damit eben nur genau übereinstimmende Werte gefunden werden - mit WAHR wird nur der passende Bereich gesucht (also der letzte Wert der ersten Spalte des angegebenen Zellbezuges, der kleiner oder gleich dem Suchbegriff ist - Voraussetzung ist dann natürlich auch noch eine aufsteigende Sortierung).
Grüße
bastla
... gibt er mir allerdings immer den Wert der Zelle oberhalb von $D$100;3
Wenn Du auch die 0 am Ende durch WAHR ersetzen musstest ... Tatsächlich ist die 0 (oder, nach Belieben, auch FALSCH) erforderlich, damit eben nur genau übereinstimmende Werte gefunden werden - mit WAHR wird nur der passende Bereich gesucht (also der letzte Wert der ersten Spalte des angegebenen Zellbezuges, der kleiner oder gleich dem Suchbegriff ist - Voraussetzung ist dann natürlich auch noch eine aufsteigende Sortierung).
Grüße
bastla