Hallo Forum,
ich habe schon wieder ein Problem: ich möchte auf eine Tabelle einen Autofilter anwenden, dessen Begriffe (beginnt mit) in einem anderen Tabellenblatt definiert sind. Den Inhalte dieses Blattes habe ich zuvor bereitgestellt. Sie beginnen jeweils mit "=" und enden mit einem "*":
Dim Exlist As Variant
Exlist = Range(Cells(1, 1), Cells(MaxRow, 1))
'umschalten auf anderes Blatt
ActiveSheet.Range(Cells(1, 2), Cells(MaxRow, 2)).AutoFilter , _
Field:=2, _
Criteria1:=Exlist, _
Operator:=xlOr
Der Begriff, der gefiltert werden soll, ist in der aktiven Tabelle in Spalte B. Das Problem mit dem oben dargestellten Code: es wird nur der 2. Filter verwendet.
Wenn ich mir dann den "benutzerdefinierten Filter" anschaue, finde ich nur einen Begriff (den 2. meiner Liste).
Was mache ich falsch? Ich möchte eine dynamische Liste von Filter-Argumenten nutzen.
Gruß
Werner