ich habe eine Tabelle (Gesamt) mit ca. 3000 Zeilen.
Nun möchte ich die Datenzeilen bei denen in der Spalte "P"
"Kopie" und "Kopien" steht, herausfiltern.
Weis da jemand eine Lösung ?
(Filtern mit 2 Kriterien)
Gruß
Fred
Sub ZweiFilterKriterien()
Range("A1:P5000").AutoFilter Field:=16, Criteria1:="*Kopie*"
End Sub
Rangebereich anpassen!
P | |
1 | 1 Kopie von Hans |
6 | Kopien von Ute |
8 | Kopien von Werner |
12 | 5 Kopien |
16 | Kopie von 8513 |
Option Explicit
Sub Filter_Kopie_n()
ActiveSheet.Range("$A$1:$P$18").AutoFilter Field:=16, Criteria1:="=*Kopie*", Operator:=xlAnd
End Sub
Gruß Matthias