Filtre sur excel

Résolu
amine69500 Messages postés 471 Statut Membre -  
amine69500 Messages postés 471 Statut Membre -
Bonjour,

je souhaiterais savoir si c'est possible de remplacer dans mon code le =70118 par un numero de cellule exemple cellule A2 de la Feuil1

merci de votre aide

Sub Macro1()

Sheets("Feuil1").Select
Selection.AutoFilter Field:=3, Criteria1:= " =70118 ", Operator:=xlAnd

End Sub

2 réponses

  1. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   957
     
    Salut le forum

    Selection.AutoFilter Field:=1, Criteria1:=Sheets("Feuil1")..Range("A1")

    Mytå
    0
  2. amine69500 Messages postés 471 Statut Membre 12
     
    Bonjour

    Merci, Merci, Merci, c'est bien ca

    Cordialement

    Amine
    0