Range.AutoFilter utilisation de plusieurs critères

Question

Bonjour à tous, j'ai besoin de votre aide encore une fois afin de finir mon fichier ce matin si possible!
Voici mon pb:
J'ai le code suivant:
Sub macrozoneSousTraitants()



ActiveSheet.Range("A5").Activate
Selection.AutoFilter Field:=1, Criteria1:="SsTrait_Spelem"
Range("A5:EN10000").Copy
Sheets("Soustraitants").Select
Range("A5").Select
ActiveSheet.Paste
Sheets("Planning").Select
ActiveSheet.AutoFilterMode = False
Range("A5").Activate



End Sub

J'aimerai mettre plusieurs conditions au filtre en plus de"Criteria1:="SsTrait_Spelem"", est ce que c'est possible avec ma solution, et sinon en avez vous une autre??
Je vous remercie beaucoup...

Ledaf

Renfield · Answer

1 - mauvais titre
2 - le '1' dans Criteria1 devrait attirer ton attention...
3 - regarde dans la DOC ou dans l'explorateur d'objets (F2) :
    Function AutoFilter([Field], [Criteria1], [Operator As XlAutoFilterOperator = xlAnd], [Criteria2], [VisibleDropDown])
    Membre de Excel.Range

tu peut donc mettre deux conditions....

cs_Ledaf · Answer

Oui mais si on a une dizaine de conditions à mettre comment fait-on??

Ledaf

cs_MPi · Answer

Pour plus de 2 conditions, tu peux concaténer les valeurs de plusieurs cellules et faire le filtre sur cette colonne concaténée

MPi²

Range.AutoFilter utilisation de plusieurs critères

3 réponses

Votre réponse

Discussions similaires