VBA Werte über Tabellen vergleichen und ersetzen

kerstel

Erfahrenes Mitglied
Hallo,

ich habe folgende Tabellen struktur:

Tabelle1 (Spalte A = bisheriger Wert, Spalte B = Neuer Wert):
A;B
abc;1

Tabelle2 (Spalte A = bisheriger Wert, Spalte B = Neuer Wert):
A;B
def;10

Tabelle3 (Verknüpfung Tabelle1 + 2 über bisheriger Wert):
A;B;C;D
abc;def;

Ich möchte nun das in Tabelle 3 (in C und D) die neuen Werte, in dem beispiel also:
A;B;C;D
abc;def;1;10

eingetragen werden.

Tabelle 1 hat 750 Zeilen, Tabelle 2 150, und Tabelle 3 450 Zeilen. Wie könnte ich das mit einem Script machen, also theorie sehe ja so aus:

- Nimm Wert Tabelle3!A1 und suche diesen Wert in Tabelle1!A
- Wenn gefunden schreibe in Tabelle3!C1 den Wert von Tabelle1!Ax (x für die Zeile in dem der Wert gefunden Wurde)
- Nimm Wert Tabelle3!A2 und suche diesen Wert in Tabelle2!A
- Wenn gefunden schreibe in Tabelle3!D1 den Wert von Tabelle2!Ax

Dann das nächste für Tabelle3!A2 usw.

Ich hab keine Ahnung wie ich das machen soll :-)

Danke und Gruß
Kerstel
 
so, habs selber rausgefunden :-)

Tabelle3
- Formel in C1: =SVERWEIS(A1;Tabelle1!$A:$B;2;FALSCH)
- Formel in D1: =SVERWEIS(B1;Tabelle2!$A:$B;2;FALSCH)

Gruß
Kerstel
 

Neue Beiträge

Zurück