Habe vor einiger Zeit mit Eurer Hilfe ein Makro erstellt, daß mir doppelte Datensätze löscht. Jetzt habe ich festgestellt, daß es besser wäre den alten bzw doppelten Datensatz zu überschreiben. Kann mir jemand dabei helfen? Hier ein Auszug aus dem Makro:
Dim iRow As Integer, iRowL As Integer
iRowL = Cells(Cells.Rows.Count, 1).End(xlUp).Row
For iRow = iRowL To 1 Step -1
If WorksheetFunction.CountIf(Columns(1), Cells(iRow, 1)) > 1 Then
Rows(iRow).Delete
End If
Next iRow
LG
Silvi