autofilter en VBA

Bonjour,

j'ai ce code qui ne veut pas fonctionner et je ne sais pas pourquoi :

Code:

---

Worksheets("feuil2").Range("a1").AutoFilter Field:=4, Criteria1:=EvaluationBis.Value

---

en sachant que EvaluationBis est une combobox

Cordialement

Hidozo

chez moi ca marche en mettant Criteria1:="toto"
qu'est-ce qui ne marche pas ? quel message d'erreur as-tu ?

tu peux peut-etre essayer en décomposant les étapes :

Code:

---

1 2 3 4

Worksheets("feuil2").Range("a1").AutoFilter Set PlageFiltre = Worksheets("feuil2").AutoFilter.Range PlageFiltre.AutoFilter Field:=4, Criteria1:=EvaluationBis.Value

---