Hallo !
mache es in VBA mit einer for-Schleife.
etwa so (aus VBA-Hilfe):
Schleifendurchlauf für einen Zellbereich
Verwenden eine For Each...Next-Schleife, um einen Schleifendurchlauf durch einen Zellbereich durchzuführen. Die folgende Prozedur durchläuft den Bereich A1

10 in Tabelle1 und stellt jede Zahl, deren absoluter Wert kleiner als 0.01 ist auf 0 (Null) ein.
Sub AufNullRunden ()
For Each meinObjekt in meineAuflistung
If Abs(meinObjekt.Value) < 0.01 Then meinObjekt.Value = 0
Next
End Sub
Der Unterschied:
Du änderst die Zeile if (Abs)...
in (Pseudocode):
if Feld = Vergleichtabellenfeld
kopiere Inhalt nach Tabelle3
das sollte dann schnell und einfach gehen.
Gruß
Andreas
