Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1588to1592
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
Inhaltsverzeichnis

Dateien vergleichen und zusammenführen

Dateien vergleichen und zusammenführen
09.11.2017 00:41:49
Yannick
Hallo liebes Forum,
ich bin blutiger Anfänger bei VBA und habe folgendes Problem.
Ich habe zwei Dateien A & B mit jeweils einer Tabelle. Die Tabelle der Datei A hat 3 Spalten und die der Datei B hat 2 Spalten. Nun möchte ich ein Makro schreiben, dass jeden Wert der 2. Spalte der Datei A mit allen Werten der 2. Spalte der Datei B vergleicht.
Kommt es zu einem Treffer, so soll der in der selben Zeile wie der Treffer stehende Wert in Datei B Spalte 1, den Wert in Spalte 3 der Datei A der ebenfalls in der selben Zeile wie der Vergleichswert steht, ersetzen.
Gibt es keinen Treffer, so soll der das Datenpaar (Spalte 1 und 2 aus Datei B) unten in die Spalten 1 und 2 der Tabelle aus Datei A angehangen werden.
WICHTIG!!! Die Dateien A und B sollen nach dem Ablauf unverändert existieren und das von mir beschriebene Prozedere in einer neuen Datei C gespeichert werden. Die Datei C ist dafür bereits vorab geöffnet und führt das Makro aus.
Ich danke euch vielmals vorab für eure Hilfe.
Beste Grüße und 1000 Dank
Yannick

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

Betreff
Datum
Anwender
Anzeige
AW: Dateien vergleichen und zusammenführen
09.11.2017 09:09:49
Peter(silie)
Hallo,
bitte gebe uns die Dateien A und B.
Bis dahin ein Bsp. Code zum öffnen und referenzieren v. anderen Workbooks/Worksheets

Dim ws_A As Worksheet
Dim wb_Tmp As Workbook
Set wb_Tmp = Workbooks.Open("Pfad")
If wb Is Nothing Then Exit Sub
Set ws_A = wb_Tmp.Sheets("A")


AW: Dateien vergleichen und zusammenführen
09.11.2017 09:34:09
Yannick
Vielen Dank für die schnelle Antwort. Leider kann ich die Dateien frühestens heute Abend hochladen.
An sich ist das ganze aber sehr eilig und dringend benötigt :(
Vielleicht hilft ja das erstmal.
A:b>
Datum | Nummer| Wort
22.08.2017 | 12351 | asd
01.07.2028 | 12355 | xcgv
02.03.2017 | 34532 | shjk
03.05.2016 | 12356 | xvc
04.05.2016 | 23413 | sdf
B:b>
Wort | Nummer
fgj | 12312
gsdfg | 12356
fha | 12355
sd | 12373
xyc | 64212
Besten Dank. LG
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige