Hallo Leute,
ich benötige eure Hilfe.
Ich muss aus 2 verschiedenen Excel-Dateien Bezeichnungen in eine weitere Datei einlesen und anschließend miteinander vergleichen. Die Daten werden ständig aktualisiert und sollen über die Betätigung von max. 2 Button eingelesen und verglichen werden.
Fakten:
Datei 1
ca. 1000 Bezeichnungen
befinden sich ab der Zelle B2 abwärts
Bezeichnungen sind nicht geordnet
es werden ständig neue Daten hinzugefügt
Bezeichnungen sollen in die neue Excel-Datei ab Zelle B2 eingefügt werden.
Datei 2
ca. 250 Bezeichnungen
befinden sich ab der Zelle A8 abwärts
Bezeichnungen sind nicht geordnet
Bezeichnungen sollen in die neue Excel-Datei ab Zelle C2 eingefügt werden und den
identischen Bezeichnungen in der Spalte B zugeordnet
Bsp:
Sp. B Sp. C
B.34 B.34
B.35 B.35
B.36
B.37
B.38 B.38
Bei fehlenden Bezeichnungen bleiben die Zellen frei und werden mit gelb hinterlegt.
Geöffnet werden die beiden Dateien wie folgt:
Dim fd As FileDialog
Set fd = Application.FileDialog(msoFileDialogFilePicker)
.Filters.Add ".xls", "*.xls", 1
Ich hoffe Ihr könnt mir da weiter helfen ;-)
Vielen Dank im Voraus
Julia
