Gibt es eine Möglichkeit, ähnlich wie der Dokumentenvergleich in WORD zwei Tabellen miteinander zu vergleichen und die Unterschiede farblich darzustellen?
Sub vergleichen()
For zeile = 2 To 1000
a = Cells(zeile, 1)
b = Cells(zeile, 2)
If a = b Then
'sind gleich
Else
Cells(zeile, 2).Interior.ColorIndex = 6
End If
Next zeile
End Sub
vergleicht Spalte A und Spalte B
von Zeile 2 bis 1000
Bei Abweichung wird die Zelle in Spalte B gelb gefärbt.
Kannst du die ja weiter ausbauen.
gruss
Uwe