Autofilter
09.04.2019 14:41:07
Eddi
ich habe eine Frage zu einem Autofilter, den ich per VBA setzen möchte.
Aktuell funktioniert der Filter Top 10 für die gesamte Liste wunderbar.
Nun möchte ich den Filter erweitern. Der Top 10 Filter soll auf einen dynamischen Bereich angewendet werden.
Im Klartext soll das bedeuten, dass ich die Top 10 Liste in Verbindung mit einem anderen Filtern setzen möchte.
Momentan sieht das Makro wie folgt aus:
Sub Filter_Entw_Top_10()
Dim lo As ListObject
Dim iCol As Long
Set lo = ActiveSheet.ListObjects(1)
'Set filter field
iCol = lo.ListColumns("Entw. 2018/2019").Index
'Apply filters to a column (field)
lo.Range.AutoFilter Field:=iCol, Criteria1:="10", Operator:=xlTop10Items
End Sub
Leider komme ich an dieser Stelle absolut nicht weiter. Könnt ihr mir da eventuell weiterhelfen?
Ich danke euch im Vorfeld für eure Hilfe!
LG
Eddi
Anzeige