Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
25.04.2024 11:49:37
Array verwenden
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1172to1176
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1172to1176
1172to1176
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

viele Dateien vergleichen und doppelte suchen

viele Dateien vergleichen und doppelte suchen
herbi
Hallo,
stehe vor folgender Herausforderung.
Muss Excel-Dateien miteinander Vergleichen und doppelte Artikel finden.
Alle Dateien stehen in einem Verzeichnis. (Die gesamtzahl aller Zeilen über alle Dateien = ca. 40000)
Alle Dateien haben in Spalte A bis O den identischen Aufbau, danach kommen Unterschiede.
Alle Dateien haben einen eindeutigen Key der sich aus dem Inhalt der Spalten A, C und D zusammensetzt
(Es ist eine 8 oder 13-stellige EAN, gesplittet in "Länderkennung", "Hersteller" und "Itemnummer")
Optimal wäre als Ergebnis eine Datei die für jeden mehrfach auftretenden Artikel folgendes enthält
Spalte A, C, D, O + Dateiname
geht so etwas?
herbi

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
ohne, dass ich...
25.08.2010 15:09:03
Oberschlumpf
...ne Lösung weiß
Hi
Zeig uns doch mal in einer Bsp-Datei, wie genau das, was du erklärt hast, aufgebaut ist.
Weil, du hast die Datei ja schon - musst du sie uns bitte nur zeigen - und der mögliche Antworter muss deine Datei, die ja schon existiert, nicht noch mal erstellen.
Ich bin fast sicher, dass du dann vllt die eine oder andere Lösungsidee mehr erhältst.
Ciao
Thorsten
AW: viele Dateien vergleichen und doppelte suchen
25.08.2010 15:59:09
Rudi
Hallo,
in O ist der Key? 
Sub ttt()
Dim sDatei As String, lngLast As Long
Dim wks As Worksheet, wksZiel As Worksheet
Dim rngDel As Range, rngC As Range
Const sPfad = "c:\test\"  'Suchpfad
Application.ScreenUpdating = False
Set wksZiel = Sheets(1)
wksZiel.Cells.Clear
sDatei = Dir(sPfad & "*.xls")
Do While sDatei  ""
Set wks = Workbooks.Open(sPfad & sDatei).Sheets(1)
lngLast = wksZiel.Cells(Rows.Count, 1).End(xlUp).Row
If lngLast > 1 Then lngLast = lngLast + 1
wks.Range("A:A,C:C,D:D,O:O").Copy wksZiel.Cells(lngLast, 1) 'Spalten kopieren
wks.Parent.Close False
With wksZiel
If lngLast > 1 Then
.Rows(lngLast).Delete
.Range(.Cells(Rows.Count, 1).End(xlUp).Offset(, 4), .Cells(lngLast, 5)) = sDatei
Else
.Cells(1, 5) = "Dateiname"
.Range(.Cells(Rows.Count, 1).End(xlUp).Offset(, 4), .Cells(lngLast + 1, 5)) = sDatei
End If
End With
sDatei = Dir
Loop
'Spalte 4 auf Unikate untersuchen und sammeln
With wksZiel
For Each rngC In .Range(.Cells(2, 4), .Cells(Rows.Count, 4).End(xlUp))
If Application.CountIf(.Columns(4), rngC) = 1 Then
If rngDel Is Nothing Then
Set rngDel = rngC
Else
Set rngDel = Union(rngDel, rngC)
End If
End If
Next
End With
'Unikate löschen
If Not rngDel Is Nothing Then rngDel.EntireRow.Delete
End Sub

Gruß
Rudi
Anzeige

299 Forumthreads zu ähnlichen Themen

Tabellen vergleichen und zusammenführen
Holzwurm

Hallo zusammen,
ich habe ein kleines Problem:
Ich habe ein Arbeitsblatt mit verschiedenen Tabellen (12 Tabelle: Januar-Dezember). Innerhalb der Tabellen sind viele Personen (ca. 2.500) aufgelistet, welche jedoch in den Monaten nicht gleich sind. Manchmal fehlen welche, manchmal kommen n...
23.09.2008 12:49:11
Thread-ID: 1011699
15 Beiträge
Anzeige
2 Tabellen verbinden ->zeilenweiser Mengenabgleich
Mike

Hallo erstmal,
als begeisterter Forumsleser habe ich schon viele Tage hier verbracht. Jetzt traue ich mich einmal hinein und hoffe auf Eure Hilfe.
Ich habe 2 laaange Tabellen. In Tabelle1 stehen (neben anderen Daten)
Teilenummer, Auftragsnummer, (Lieferwoche) und Stück und in Tabel...
16.10.2008 11:37:00
Thread-ID: 1016808
8 Beiträge
Zwei Tabellen vergleichen
Manfred

Hallo zusammen,
ich habe mal wieder ein Problem.
Ich bekomme von u.g. Code einen Indexfehler.
Ich finde den Fehler nicht. Kann mir jemand helfen ? Oder gibts ne andere Lösung.
Sub Tab1_zu_Tab2_vergleichen2() 'vergleicht Alphanumerische Werte Tab1, Sp.B mit Alphanumerieschewert...
05.11.2008 11:43:00
Thread-ID: 1021820
16 Beiträge
Anzeige
zwei tabellen vergleichen
kalle

hallo leute,
ich hoffe mir kann jemand helfen den ich kann kein vba.
ich habe folgende situation:
1.) ich habe zwei tabellen und möchte das zeilen (außer spalte E) die in tabelle1 aber nicht in tabelle2 vorhanden sind in tabelle3 eingetragen werden
2.) möchte ich zeilen die in t...
04.01.2009 13:48:46
Thread-ID: 1036719
4 Beiträge
2 Tabellen vergleichen und Pärchen bilden
Universal

Guten Abend Excel-Profis,
ich hoffe, dass ihr mir helfen könnt. Ich habe hier und auch in anderen Foren gesucht - natürlich auch was gefunden - aber ich konnte es nie in meine gewünschte Form umwandeln.
Ich habe 2 riesige Tabellen mit mehreren tausend Datensätzen und mehreren Spalten. L...
25.01.2009 21:52:00
Thread-ID: 1043691
6 Beiträge
2 TabellenBlätter vergleichen - gleiche markieren
Andy

Hallo,
ich habe 2 unterschiedliche Tabellen in denen ein Mitgliederabgleich durch geführt werden soll.
In der Tabelle1 sind die Namen der Mitglieder einer Gruppe zusammen in einer Zelle hinter einander geschrieben; in der der Tabelle2 sind alle Mitglieder unter einander (jeweils neue Ze...
16.04.2009 11:44:02
Thread-ID: 1069028
13 Beiträge
Daten vergleichen und übernehmen/zusammenführen
pemoe

Hallo,
ich habe folgendes, für Excel-Profis sicher leicht zu lösendes Problem. Es geht um eine Auswertung von Laboruntersuchungen, in Datei 1 steht in Spalte A jeweils die Anzahl und in Spalte B die Bezeichnung für die Untersuchungen. In Datei 2 steht zusätzlich für jede Untersuchungsbezeic...
14.05.2009 14:37:02
Thread-ID: 1075170
5 Beiträge
Tabellenblätter vergleichen und abgleichen
Stefan

Hallo Forum,
ich habe folgendes Problem:
Ich möchte zwei Tabellen aus zwei unterschiedlichen Dateien (Tabelle 1 in Datei 1 und Tabelle 2 in Datei 2) vergleichen. Taucht in Tabelle 1, eine Zeile auf die Tabelle 2 nicht vorhanden ist, soll diese in Tabelle 2 an der gleichen Stelle eingefü...
22.06.2009 12:37:22
Thread-ID: 1083431
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
14
7
7
15
3
3
5
12
4
4
1
5
6
4
3
1
1
1
4
2
1
4
2
1
2