Hallo,

ich benutze den Advanced Filter:

Sheets("Auswertung").Range("A10:T65536").AdvancedFilter Action:=xlFilterCopy _
, CriteriaRange:=Range("A5:A6"), CopyToRange:=Range("A10:T10"), _
Unique:=False

Kann mir jemand sagen ob es möglich ist die CriteriaRange:=Range("A5:A6") nicht als Range sondern als String zu übergeben?

Vielen Dank.

Matthias