Hallo Petaod,
hab mich lange nicht mehr mit der Materie befasst und nun folgendes Problem (siehe Excel Anhang).
Ziel ist: Tabellenblatt1(T1) mit Tabellenblatt2(T2) vergleichen.
In T2 stehen alle Attribute DE1_I_LVERS#, VERTR#,DE1_I_ABR_TERM u.s.w. und in jeweils gleicher Spalte 1 drunter die Wertinhalte
von links nach rechts und dann nach unten schön geordnet. (Also Zeilenweise) Farblich markiert mit Aquamarin
Genau die gleichen Attribute stehen nun spaltenweise in T1. Das nicht so gute: Ausgabe für T1 stammt aus einer Datenbank, welche über Ultraedit in Excel gezogen wurde. Hier stehen jetzt in einer Zelle das Attribut und mit ; (Strichpunkt) getrennt und "" Hochkommata die Wertinhalte. (Aquamarin) Mehr noch: Vor dem Attribut; "Wertinhalt"; stehen noch 4 Einträge mit ;;; getrennt, die eigentlich aus der Zelle herauskönnten. Ob sie für einen Vergleich rausmüssen, weiß ich nicht? Ziel ist es jetzt also, Aquamarinen Wertinhalt und alle anderen Wertinhalte von T2 mit Aquamarin Wertinhalt aus T1 zu vergleichen. Wenn Wertinhalt nicht gleich ist, wäre es schön, wenn der abweichende Wert aus T2 mit seinem Attribut in T1 in Spalte B neben dem abweichenden Wert stehen würde und rot eingefärbt wird. Etwas tricky ist dann vielleicht noch das in T1 und T2 rot eingefärbte. Da stehen 2 Wertinhalte untereinander, die aber auch zeilenweise durchlaufen werden. In T1 wird das durch die Datenbankmitgabe VERSB(1,1), VERSB(1,2) deutlich.
Der Vergleich beginnt ab Spalte F in T2. Die Spalten vorher werden als Schlüssel verwendet. Also ab Spalte F stimmen zeilenweise Attribute genau überein mit spaltenweise Attribute in T1. Petaod, kannst du mir da bitte helfen. Ich hab kein Plan mehr. In Tabelle 3 hab ich mal einen Code angefangen, den ich vor nem Jahr zu sowas geschrieben habe. Scheint mir aber viel zu umständlich.
Danke und Viele Grüsse
VBA Begins
hab mich lange nicht mehr mit der Materie befasst und nun folgendes Problem (siehe Excel Anhang).
Ziel ist: Tabellenblatt1(T1) mit Tabellenblatt2(T2) vergleichen.
In T2 stehen alle Attribute DE1_I_LVERS#, VERTR#,DE1_I_ABR_TERM u.s.w. und in jeweils gleicher Spalte 1 drunter die Wertinhalte
von links nach rechts und dann nach unten schön geordnet. (Also Zeilenweise) Farblich markiert mit Aquamarin
Genau die gleichen Attribute stehen nun spaltenweise in T1. Das nicht so gute: Ausgabe für T1 stammt aus einer Datenbank, welche über Ultraedit in Excel gezogen wurde. Hier stehen jetzt in einer Zelle das Attribut und mit ; (Strichpunkt) getrennt und "" Hochkommata die Wertinhalte. (Aquamarin) Mehr noch: Vor dem Attribut; "Wertinhalt"; stehen noch 4 Einträge mit ;;; getrennt, die eigentlich aus der Zelle herauskönnten. Ob sie für einen Vergleich rausmüssen, weiß ich nicht? Ziel ist es jetzt also, Aquamarinen Wertinhalt und alle anderen Wertinhalte von T2 mit Aquamarin Wertinhalt aus T1 zu vergleichen. Wenn Wertinhalt nicht gleich ist, wäre es schön, wenn der abweichende Wert aus T2 mit seinem Attribut in T1 in Spalte B neben dem abweichenden Wert stehen würde und rot eingefärbt wird. Etwas tricky ist dann vielleicht noch das in T1 und T2 rot eingefärbte. Da stehen 2 Wertinhalte untereinander, die aber auch zeilenweise durchlaufen werden. In T1 wird das durch die Datenbankmitgabe VERSB(1,1), VERSB(1,2) deutlich.
Der Vergleich beginnt ab Spalte F in T2. Die Spalten vorher werden als Schlüssel verwendet. Also ab Spalte F stimmen zeilenweise Attribute genau überein mit spaltenweise Attribute in T1. Petaod, kannst du mir da bitte helfen. Ich hab kein Plan mehr. In Tabelle 3 hab ich mal einen Code angefangen, den ich vor nem Jahr zu sowas geschrieben habe. Scheint mir aber viel zu umständlich.
Danke und Viele Grüsse
VBA Begins