ich würde gerne eine größere Datenmenge ohne Spezialfilter
nach Duplikaten in der ersten Spalte durchsuchen und diese
ausblenden. Habe hier aus dem Forum mir mal einen Code gemopst,
minimal angepasst, allerdings blendet der mir jetzt irgendwie alles aus :-)
Weiß da jemand spontan Rat?
Sub Makro1()
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).Hidden = True
End If
Next iRow
End Sub
Gruß Daniel