Ich möchte ein Unikatsliste erstellen. Die Tabelle "Database" beinhaltet die nötigen Daten, welche sich in der
Spalte F bis K befinden. Die Unikatsliste sollte dann in der Tabelle "Giochi" aufgelistet werden.
Ich habe folgenden Code geschrieben, bekomme aber leider den Laufzeitfehler 424 (Objekt fehlt). Was mache ich falsch?
Auch bin ich mir nicht sicher, wie ich den RAnge in der Tabelle "Giochi" definieren muss. Muss ich evtl. nur die nötigen 5 Spalten angeben, oder muss ich auch die entsprechende Zeilennummer ermitteln?
Grazie Berni
Sub UnikatslisteGiochi()
With tbl_Database
.Range("F2:K" & .UsedRange.Count).AdvancedFilter _
Action:=xlFilterCopy, CopyToRange:=Worksheets("Giochi").Range("A2:E2"), Unique:=True
End With
End Sub
|