Filtre multicritere

benjamin -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour les amisl
Je viens vers vous ce matin pour vous soumettre mes difficultés qaunt a la programmation VBA des filtres.
je desire effectuer un filtre, mais je n'y arrive pas. exite t-elle une erreur? ou une autre possibité? aidez moi.

Voici le programme

Sub filtr
Dim w
Dim rep
Set w = Worksheets("feuil2")
With w
.AutoFilterMode = False
.Cells.AutoFilter
.Cells.AutoFilter field:=2, Criteria1:=">=1", _
Operator:=xlAnd, Criteria2:="<=99
End With
End Sub

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Il faut une plage de cellules

    Sub filtr()
    Dim w
    Dim rep
    Set w = Worksheets("feuil2").Range("A1:C10")
    With w
    .Cells.AutoFilter
    .Cells.AutoFilter field:=2, Criteria1:=">=1", _
    Operator:=xlAnd, Criteria2:="<=99"
    End With
    End Sub
    0