Macro tri auto avec 3 critères ou plus

Bonjour à tous,

Je sollicite votre aide pour une macro pour un tri automatique avec 3 critères dans la même colonne.

Mon fichier est trop volumineux pour le mettre en PJ.

Je vous met la partie macro déjà créer pour que ce soit un peu plus explicite

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End sub

La partie en gras bloque, j'ai l'impression de ne pouvoir mettre que 2 critères.

Merci d'avance pour vos lumières en espérant avoir été assez clair.

Peka

Bonsoir,

A tester :

Range("$A$1:$AL$" & drligne).AutoFilter Field:=6, Criteria1:=Array(nom_demande1, _
        nom_demande2, nom_demande3), Operator:=xlOr

Bonne soirée

Bouben

Bonsoir Bouben,

Merci bcp ça marche nickel

Bonsoir,

C'est là que l'enregistreur peut rendre quelque service...

....Criteria1:=Array(nom_demande1, nom_demande2, nom_demande3), Operator:=xlFilterValues

Cordialement.

Salut Bouben !

Salut MFerrand !

Bien évidemment, toujours utiliser l'enregistreur de macro pour ce type de problème.

Qui connaît la syntaxe de tri par coeur ! Impossible sinon inutile ...

Après, toujours penser à faire le ménage (supprimer les .select, .activate, etc).

Et pour le fun, remplacement du "Operator:=xlFilterValues", par le "xlOr" du code initial. Juste pour l'intox

A plus !

Bouben

Je note l'intox

Bonne nuit !