Hallo,
ich habe ein Sheet mit einer variablen Anzahl an Zeilen (momentan 1300), die jeweils 20 Werte enthalten.
Ich will ein Makro schreiben, dass mir doppelt vorkommende Zeilen löscht.
Also es soll jede Zeile mit allen anderen vergleichen und wenn alle 20 Werte gleich sind, eine der beiden Zeilen löschen.
Ich kenne mich schon etwas mit VBA aus, aber gut wäre zu viel gewesen.
So stell ich's mir von der Funktionalität her vor:
a= "Erste Zeile"
b= "aktuelle Zeile"
b2="Vergleichszeilen"
c= "Letzte Zeile"
FOR b=a TO c
For b2=a+1 TO c
IF Cells(b,1) = Cells(b2,1) THEN
IF Cells(b,2) = Cells(b2,2) THEN
...
ActiveCell.Rows.EntireRow.Delete
...