Hallo,

ich möchte gerne im VBA Code statt wie im Beispiel die Kriterien mittels einer Variablen einbauen (sind mehrere Ausprägungen).

Also wo ich im Vorfeld die Ausprägungen ermittel und statt der Aufzählung dann zB var_K22 reinpacke.

Leider bekomme ich das nicht hin. ggf. liegt es an den Anführungszeichen.

so klappt es nicht:
x = "1_1" & Chr(34) & "," & Chr(34) & "1_2"

Wie kann ich es hinbekommen?
Danke für Eure Tipps 

ActiveSheet.Range("$A$2:$BI$920").AutoFilter Field:=28, Criteria1:=Array( _
        "1_1", "1_1_144", "1_1_84", "1_10", "1_14"), Operator:=xlFilterValues