Office: 2 Tabellen Vergleichen und neue datensätze unten anfügen

Helfe beim Thema 2 Tabellen Vergleichen und neue datensätze unten anfügen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; allo liebes Team, habe noch ein Problem (das in vielen Foren z.T. andiskutiert und ähnlich gelöst wird) bei den Schleifen bei folgender... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Makro, 21. Juli 2014.

  1. Makro Neuer User

    2 Tabellen Vergleichen und neue datensätze unten anfügen


    allo liebes Team,
    habe noch ein Problem (das in vielen Foren z.T. andiskutiert und ähnlich gelöst wird) bei den Schleifen bei folgender Aufgabenstellung:
    Leider komme ich nicht mehr weiter, auch Klaus-Dieters Excelwelt und co hilft mir nicht weiter. Bitte nur an User die keine stupiden Kommentare mit "wozu mit Makro?", "mach doch mit SVERWEIS & co", das nervt schlichtweg und ist wie in der Schule "Themaverfehlung"

    Ich möchte zwei Dateien vergleichen: Beide Tabellen Haben Daten in selbigem Format in Spalten B-H.
    Tabelle A ist meine Masterliste, Tabelle 2 ist eine Art Downloaddatei, die regelmäßig aktualisert und in selbigem Format ersetzt wird (kommen immer neue Einträge dazu).

    Ich würde gerne erreichen, dass in meiner Masterliste die "neu dazugekommenen" Einträge aus der Downloaddatei in die aktuell unterste Zeile (EndeMaster) der Masterdatei angefügt werden.
    Mein Problem besteht v.a. in der IF-Clause bzw. Schleife: Eig. sollte jede Zeile der Downloaddatei mit der Masterliste Zeile für Zeile abgeglichen werden und erst wenn alle Zeilen der Masterliste durchlaufen sind, die Einträge kopiert werden, falls sie nicht vorkommt.
    Falls der Datensatz bereits in der Masterliste ist, soll nichts passieren (Schleife einfach den Nächsten Datensatz prüfen).

    If Clause soll prüfen: Wenn Wert in Spalte B und Spalte H aus beiden Dateien identisch ist, dann ist der Datensatz schon vorhanden. Wenn <> dann soll der "Neue" Datensatz (alle Werte in Spalten B-H) in Masterliste in letzter Zeile angefügt werden.

    Masterliste (Aussehen):
    Spalte A Spalte B (SNR) Spalte C Spalte D ... Spalte H (NR)
    leer AAA XX 12 45
    ... BBB XXX 123 456
    ... CCC XXXX 5456 77
    ...

    Downloaddatei (Aussehen):
    Spalte A Spalte B (SNR) Spalte C Spalte D ... Spalte H (NR)
    leer AAA XX 12 45
    leer BBB XXX 123 456
    ... CCC XXXX 5456 77
    ... NNN (neu) NN 564 31
    ... MMM (neu) NNN 789 4

    Bisheriger Code:
    ____________________________________________________________________________

    Sub...
    Dim i, j, k
    Dim DL, Master As Workbook
    Dim EndeMaster, EndeDL, n As Integer

    Set Master = ThisWorkbook
    Set DL = Workbooks.Open("Download.xls", ReadOnly:=True)
    EndeMaster = Master.Sheets("Tabelle1").Cells(65000, 2).End(xlUp).Row
    EndeDL = DL.Sheets("Tabelle1").Cells(65000, 2).End(xlUp).Row

    i = 1
    j = 1
    k = 1

    Master.Activate
    For i = 3 To EndeDL
    For j = 3 To EndeUR
    If DL.Sheets("Tabelle1").Cells(i, 10) <> Cells(j, 2).Value And DL.Sheets("Tabelle1").Cells(i, 16) <> Cells(j, 8).Value Then
    ' MsgBox ("WERTE UNGLEICH: " & Cells(i, 10) & " | " & Cells(j, 2) & " xx " & Cells(i, 16) & " | " & Cells(j, 8))
    Range("J" & i & ":" & "P" & i).Select
    Selection.Copy
    Range("B" & EndeMaster + k).Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
    Else
    ' MsgBox ("WERTE GLEICH: " & Cells(i, 10) & " | " & Cells(j, 2) & " xx " & Cells(i, 16) & " | " & Cells(j, 8))
    Exit For
    End If
    Next j
    k = k + 1
    Next i

    DL.Close

    End Sub
     
    Makro, 21. Juli 2014
    #1
  2. Beverly
    Beverly Erfahrener User
    Hi,

    ich würde wir folgt verfahren:

    1. in Spalte I beider Tabellen per Formel eine Verknüpfung aller Zellen von A bis H erstellen
    2. in einer Schleife über alle Datensätze laufen und mittels Application.CountIf prüfen, ob der Inhalt aus Spalte I der laufenden Zeile in Spalte I der anderen Tabelle vorkommt - wenn nicht, dann diese Zeile aus der Downloadtabelle in die Masterliste übernehmen.

    Bis später,
    Karin
     
    Beverly, 21. Juli 2014
    #2
Thema:

2 Tabellen Vergleichen und neue datensätze unten anfügen

Die Seite wird geladen...
  1. 2 Tabellen Vergleichen und neue datensätze unten anfügen - Similar Threads - Tabellen Vergleichen datensätze

  2. Tabellen Vergleichen - Bedingte Formatierung nicht möglich

    in Microsoft Excel Hilfe
    Tabellen Vergleichen - Bedingte Formatierung nicht möglich: Guten Morgen, Ich habe folgendes Problem und komme einfach nicht weiter. Ich habe eine Spalte mit mehr als 500 verschiedenen ISIN Nummern (Also Nummern die aus Zahlen und Buchstaben bestehen). In...
  3. Excel Tabellen Vergleich

    in Microsoft Excel Hilfe
    Excel Tabellen Vergleich: Hallo liebe Community Ich habe spalte A mit Namen Befüllt in Tabell 2 Spalte A stehen diese Namen auch aber durchgewürfelt mit einem dazugehörigem Wert in Spalte B Ich möchte nun in einer Spalte...
  4. Zwei Tabellen vergleichen und Werte aus zweiter Tabellen übernehmen

    in Microsoft Excel Hilfe
    Zwei Tabellen vergleichen und Werte aus zweiter Tabellen übernehmen: Folgendes Problem: Ich habe eine Mastertabelle "TabelleA" in dieser sind sämtliche Artikel mit Bezeichnung usw. aufgeführt. Nun kommt ein Update in Form von "TabelleB" mit gleichem Aufbau und...
  5. 2 Tabellen auf den Aufbau vergleichen

    in Microsoft Access Hilfe
    2 Tabellen auf den Aufbau vergleichen: Hallo, ich wollte 2 Tabellen die ähnliche Spalten haben, auf ihre Spalten vergleichen. Am besten mit einer Abfrage. Also Tabelle1 mit den Spalten A B C D und Tabelle2 mit den Spalten C D E F....
  6. Vergleichen zweier Tabellen und Suchen von inkonsistenten Datensätzen

    in Microsoft Access Tutorials
    Vergleichen zweier Tabellen und Suchen von inkonsistenten Datensätzen: Vergleichen zweier Tabellen und Suchen von inkonsistenten Datensätzen Access für Microsoft 365 Access 2019 Access 2016 Access 2013 Access 2010 Access...
  7. INDEX-Formel mehrere Werte einer Tabelle untereinander auflisten

    in Microsoft Excel Hilfe
    INDEX-Formel mehrere Werte einer Tabelle untereinander auflisten: Hallo zusammen, leider war ich mit meiner Google-Recherche nicht sonderlich erfolgreich, sodass ich von euch Rat erbitte. Und zwar möchte ich Werte aus einer Tabelle (Werte von Spalte 4) in...
  8. Index ()/Vergleich - Formatierung als Tabelle löscht die Ergebnisse

    in Microsoft Excel Hilfe
    Index ()/Vergleich - Formatierung als Tabelle löscht die Ergebnisse: Hallo Liebe xls Experten, folgendes Problem: Mit der Formel Index()/Vergleich habe ich aus einer PivotTabelle entsprechende Werte in eine andere Tabelle (nicht Pivot) übernommen. Die Formel...
Schlagworte:
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden