Filtre multicritere

benjamin -  
f894009 Messages postés 17277 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
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
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