Arbeitsmappen vergleichen

Bild

Betrifft: Arbeitsmappen vergleichen
von: Werner Brauns
Geschrieben am: 03.03.2005 10:04:40
Hallo!
Es wurde sicher schon einige Male angesprochen, aber ich finde im Forum (oder sonst wo) einfach nichts passendes zu meinem Problem.
Ich gebe also Daten (z. B. eine Versicherungsnummer) in Tabelle1 von Arbeitsmappe 1 ein.
Dann möchte ich per Script, dass Excel in einer bereits bestehenden Arbeitsmappe 2 nachsieht, ob es diese versicherungsnummer dort gibt.
Wenn ja möchte ich einen Hinweis darauf bekommen.
Geht sowas?
Wäre echt nett, wenn mir jemand helfen könnte.
Gruß
Werner

Bild

Betrifft: AW: Arbeitsmappen vergleichen
von: Hajo_Zi
Geschrieben am: 03.03.2005 10:27:41
Hallo Werner
schaue mal auf meine Homepage da ist ein Beispiel auf der Seite VBA.
Beispieldatei

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Home und Excel Version XP 2003 SP1.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Bild

Betrifft: AW: Arbeitsmappen vergleichen
von: Werner Brauns
Geschrieben am: 03.03.2005 11:16:40
Danke für die Antwort.
Aber geht das auch über zwei Arbeitsblätter hinweg? Dein Code beschreibt (soweit ich das auf die Reihe kriege mit meinen beschränkten VBA-Kenntnissen) den Vergleich zwischen zwei Tabellen in ein un der selben Arbeitsmappe.
Die Tabellen, die ich vergleichen möchte, sind jedoch in zwei verschiedenen Dateien.
Gruß und Danke!
Werner
Bild

Betrifft: AW: Arbeitsmappen vergleichen
von: Hajo_Zi
Geschrieben am: 03.03.2005 11:25:52
Hallo Werner,
scheibe vor der Tabelle die Datei
Workbooks ("Datei1.Xls").Worksheets("Tabelle1").
Gruß Hajo
Bild

Betrifft: AW: Arbeitsmappen vergleichen
von: Werner Brauns
Geschrieben am: 03.03.2005 12:44:00
Es scheint zu gehen.
Leider markiert er mir auch die leeren Felder, die in der Zieltabelle vorkommen.
Schön wäre es, wenn er nur die Felder markiert, die tatsächlich doppelte Daten enthalten.
Denn nur die Interessieren ja.
Aber auf jeden Fall VIELEN DANK für die Hilfe!
Echt super!
Gruß
Werner
Bild

Betrifft: AW: Arbeitsmappen vergleichen
von: Hajo_Zi
Geschrieben am: 03.03.2005 12:50:42
Hallo Werner,
ändere doch den Code
For LoI = 1 To LoLetzte1
For LoJ = 1 To LoLetzte2
If Worksheets("Tabelle1").Cells(LoI, 1) <> "" Then
If Worksheets("Tabelle1").Cells(LoI, 1) = Worksheets("Tabelle2").Cells(LoJ, 2) Then
Worksheets("Tabelle2").Cells(LoJ, 2).Interior.ColorIndex = 19
End If
End If
Next LoJ
Next LoI
Gruß Hajo
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Arbeitsmappen vergleichen"