Supportnet / Forum / Tabellenkalkulation
Excel-Tabellen vergleichen
Frage
Hallo,
ich habe eine Arbeitsmappe, in der es zwei Tabellenblätter gibt. In beiden Tabellenblättern gibt es eine Spalte, die Namen beinhalten.
Mein Problem:
Ich brauche eine Formel, die mir in der einen Tabelle alle Namen markiert, die in der anderen Tabelle vorkommen!!!
Wäre über Hilfe sehr dankbar!!!
Danke!!
Antwort 1 von fürLau
Hallo,
kopiere nachfolgenden Code in den Codebereich einer Befehlsschaltfläche:
TabellenNamen und Spalten müßten Deinen Gegebenheiten entsprechend angepasst werden.
Gruß
kopiere nachfolgenden Code in den Codebereich einer Befehlsschaltfläche:
Option Explicit
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim lzeile&, x&, i&, sel$
Worksheets("Tabelle2").Select
lzeile = Range("A65535").End(xlUp).Row
Worksheets("Tabelle1").Select
For x = 1 To Range("A65535").End(xlUp).Row
For i = 1 To lzeile
If Range("A" & CStr(x)).Value = Worksheets("Tabelle2").Range("A" & CStr(i)).Value Then
sel = sel & "A" & CStr(x) & ","
End If
Next
Next
sel = Left(sel, (Len(sel) - 1))
Range(sel).Select
Application.ScreenUpdating = True
End SubTabellenNamen und Spalten müßten Deinen Gegebenheiten entsprechend angepasst werden.
Gruß
Antwort 2 von CaroS
Hallo Pfaen,
Du kannst es auch mit Formeln machen. Angenommen, die Namen stehen in den Tabellen "Tbl01" und "Tbl02" jeweils in Spalte A. Um eine Anzeige in Textform zu bekommen, in Tbl01!B1 die Formel:
=WENN(ZÄHLENWENN(Tbl2!A:A;A1) > 0;"ja";"nein")
und in Tbl02!B1 die Formel:
=WENN(ZÄHLENWENN(Tbl1!A:A;A1) > 0;"ja";"nein").
Du kannst jetzt auch noch den Text "ja" / "nein" verbergen (Spaltenbreite = 0) und die Kennzeichnung mit einer bedingten Formatierung machen: die Spalte A oder einen Zellbereich A1:Ax markieren, Format -- bedingte Formatierung... -- Formel ist -- =B1="ja" -- Format... auswählen -- OK.
Gruß,
CaroS
Du kannst es auch mit Formeln machen. Angenommen, die Namen stehen in den Tabellen "Tbl01" und "Tbl02" jeweils in Spalte A. Um eine Anzeige in Textform zu bekommen, in Tbl01!B1 die Formel:
=WENN(ZÄHLENWENN(Tbl2!A:A;A1) > 0;"ja";"nein")
und in Tbl02!B1 die Formel:
=WENN(ZÄHLENWENN(Tbl1!A:A;A1) > 0;"ja";"nein").
Du kannst jetzt auch noch den Text "ja" / "nein" verbergen (Spaltenbreite = 0) und die Kennzeichnung mit einer bedingten Formatierung machen: die Spalte A oder einen Zellbereich A1:Ax markieren, Format -- bedingte Formatierung... -- Formel ist -- =B1="ja" -- Format... auswählen -- OK.
Gruß,
CaroS
Antwort 3 von CaroS
Hallo Pfaen und alle anderen,
das war natürlich wieder ein ganz großartiger Schreibfehler. Entweder schreibt man einheitlich Tbl01, Tbl02 oder nur Tbl1, Tbl2. Naja, nicht ganz so schlimm, die meisten müssen die Formeln wohl sowieso anpassen.
CaroS
das war natürlich wieder ein ganz großartiger Schreibfehler. Entweder schreibt man einheitlich Tbl01, Tbl02 oder nur Tbl1, Tbl2. Naja, nicht ganz so schlimm, die meisten müssen die Formeln wohl sowieso anpassen.
CaroS
Antwort 4 von Pfaen
@ fürLau:
Und wie kann ich in dem Code noch einfügen, dass er das gefundene Feld irgendwie Farbig, Fett oder sonst wie hervorhebt??
Das wäre Klasse!!
Danke!
Und wie kann ich in dem Code noch einfügen, dass er das gefundene Feld irgendwie Farbig, Fett oder sonst wie hervorhebt??
Das wäre Klasse!!
Danke!
Antwort 5 von fürLau
Hallo
Wenn Du die Code-Zeile:
änderst zu
werden die Zellen Grün hinterlegt.
Gruß
Wenn Du die Code-Zeile:
Range(sel).Selectänderst zu
Range(sel).Interior.ColorIndex = 4werden die Zellen Grün hinterlegt.
Gruß