Das Archiv des Excel-Forums

2 dateien miteinander abgleichen

Bild

Betrifft: 2 dateien miteinander abgleichen
von: Ronny

Geschrieben am: 22.09.2003 10:20:12

hallo,

ich habe 2 dateien.
in datei A gibt es die Spalten: Anrede, Name, email, PLZ, Wohnort...

in datei B gibt es die Spalten: email, geburtsdatum

die spalte "geburtsdatum" aus datei B sollte sozusagen datei A ergänzen undzwar nach den email adressen geordnet, da diese die einzigsten erkennungsmerkmale sind.
auch kommt es in Datei B vor, dass die email adresse nicht komplett erfasst wurde.
zb. "HerbertMaier@t-on" (<-hier fehlt das "line.de")

mit nem makro hab ich es für eine zeile schon geschaft *gg*, wollte ne schleife drumherumbasteln aber das funzt nich so wirklich.

könnte mir jemand helfen, wäre wirklich sehr dankbar.

Bild


Betrifft: AW: 2 dateien miteinander abgleichen
von: Erich M.
Geschrieben am: 23.09.2003 08:59:48

Hallo Ronny,

wie wärs wenn du den Code ins Forum stellst?

mfg
Erich


Bild


Betrifft: AW: 2 dateien miteinander abgleichen
von: Ronny
Geschrieben am: 23.09.2003 09:48:19

ok,hier

Dim suchwort As Variant
Dim zelle As String
Dim zellen, zelle3, zelle4 As String
Dim i As Integer

For i = 1 To 13


Windows("netbislogon.xls").Activate

zelle = "A" + CStr(i)
Range(zelle).Select
suchwort = Range(zelle).Value
zellen = "B" + CStr(i) + ":" + "E" + CStr(i)
inhalt = Range(zellen).Value
Range(zelle).Select
Selection.Copy
Windows("user1999.xls").Activate
Cells.Find(What:=suchwort, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate


Range("C1:F1") = inhalt


Next i


thx


Bild


Betrifft: AW: 2 dateien miteinander abgleichen
von: Ronny
Geschrieben am: 23.09.2003 11:52:30

hiho,

und was mach ich jetzt, wenn das "suchfenster" in excel das gesuchte nicht findet?
sowas wie eine IF-abfrage?

da steht was von .activate - er kann ja aber die zelle nich aktivieren wenn er sie nicht findet.

also, bei nicht finden soll er einfach weiterspringen bzw. den nächsten durchlauf starten.

wie machen?

thx


 Bild

Excel-Beispiele zum Thema " 2 dateien miteinander abgleichen"

Alle Dateien im Verzeichnis öffnen download Dateien listen download
400 leere Textdateien anlegen download XL-Dateien in UserForm listen download
XL5/7-Dateien nach XL8 konvertieren download Dateien aus Listbox auslesen und öffnen download
Excel-Dateien eines Ordners listen download Alle Dateien ab einem bestimmten Datum listen download
Alle Dateien eines Verzeichnisses drucken download Textdateien verbinden download
Serie von Dateien in das XL5/7-Format konvertieren download Verzeichnisbaum aufrufen und Dateien in ListBox auflisten download
Dateien einer Ordnerliste in einer Tabelle zusammenstellen download Daten aus allen Dateien eines Verzeichnisses zusammenführen download
Hyperlinks zu allen Excel-Dateien eines Verzeichnisses erstellen download Dateien in einem Verzeichnis und Unterverzeichnissen suchen download
XL-Dateien aus Haupt- und Unterverzeichnissen einlesen download Die Eigenschaft "Stichwort" in allen Dateien eines Ordners ändern download
Textdateien vergleichen und Unterschiede dokumentieren download Löschen von Dateien beim Schließen einer Arbeitsmappe download
Grafikdateien suchen download Erste Blätter aus allen Dateien eines Verzeichnisses sammeln download
Von allen Arbeitsblättern der Mappe HTML-Dateien anlegen download Textdateien auslesen und in Werte in Zellen eintragen download
Werte nach Gruppen aufteilen und in gesonderten Dateien speichern download Fragen aus Textdateien in UserForm-Label einlesen download
Text in Textdateien suchen und Fundzeilen in Tabelle ausgeben download Alle Dateien löschen, die älter als 30 Tage sind download
Dateien mit Angabe des Dateidatums mit Hyperlink listen download Dateien listen und gekennzeichnete öffnen download
UserForm-TextBoxes-Texte in Textdateien speichern download Tabellenblattinhalte in getrennten Textdateien speichern download
Dateien listen und Blätter in neue Arbeitsmappe kopieren download Bei Doppelklick Textdateien in Editor öffnen download
Dateiliste mit allen xl-Dateien und Hyperlinks erstellen download Aufruf von Textdateien protokollieren download
Textdateien mit einer Zeile in Tabelle einlesen download Alle Textdateien eines Verzeichnisses importieren download
Dateien öffnen, Verknüpfungen aktualisieren, speichern, schießen download Dateien suchen download
Dateien mit bestimmtem Inhalt suchen download