Référence de cellule dans une macro

Résolu
Bonjour,

j'ai une macro pour filtrer mes infos de mon tableau comme ci-desous

Sheets("Fichier principal").Select
ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=5, Criteria1:="1"
ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=6, Criteria1:="<>"

Je voudrais que le Criteria1 fasse référence à une cellule d'une autre feuille dans laquelle je pourrai y mettre les autres critères. Par exemple 2 ou 3 ou 4. Ainsi il pourrait effectuer les filtres en fonction de ma cellule de référence.
Suis-je clair !!!
Merci de votre aide précieuse

2 réponses

  1. parfait, tu as tout compris et tes explications sont claires et nette. Ca marche et j'en suis ravi.
    A+ et merci
    0
    1. Bonjour
      si j'ai bien compris :
      autre feuille avec nom onglet "feuil2" et emplacement du critère en A1

      dim crit as string
      sheets("feuil2").activate
      crit=cells(1,1)
      Sheets("Fichier principal").activate
      ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=5, Criteria1:= crit
      0