Discussion :

[Joncy]

Bonjour à toutes et à tous,

Je bloque depuis pas mal de temps sur un problème "simple" à mon avis.
J'ai fait différentes recherches mais rien trouvé de concret.

Je souhaite filtrer sur ma colonne 3 tous les critères sauf certains critères contenant certains mots.
Je ne peux mettre que 2 critères avec le code autofilter, j'ai essayer d'intégrer la fonction "Array" mais qui ne fonctionnent pas avec l'opérateur "différent de".

Code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sheets("STOCK").Activate
    ActiveSheet.Range("$U$6").AutoFilter Field:=21, Criteria1:="<>0", Operator:=xlAnd, Criteria2:="<>"
    ActiveSheet.Range("$C$6").AutoFilter Field:=3, Criteria1:=Array("<>*CP*", "<>*Barre*", "<>*Chev*", "<>*Pout*", "<>*Bast*", "<>*Mad*", "<>*Plan*")
    Range("A7", Range("A7").End(xlDown)).Copy
If Sheets("STOCK").AutoFilter.Range.Columns(3).SpecialCells(xlCellTypeVisible).Cells.Count > 1 Then 
[...]

Est-que quelqu'un pourrait m'aiguiller afin de trouver le bon code?

Merci de votre retour !

[joe.levrai]

Bonjour,

sauf erreur, il n'est pas possible d'utiliser l'autofilter avec plus de deux critères "différents de".

Il faut se tourner vers un filtre avancé, ou réaliser une boucle pour parcourir la plage (ou traitement en tableau interne)

[Tête de chat]

Bonjour,

j'ai le sentiment que ce que tu veux faire n'est pas supporté par Autofilter. Il semble que la syntaxe Criteria1:=Array est disponible seulement pour une liste de valeurs sélectionnées, mais pas pour une liste d'expressions filtre numérique ou texte à appliquer.

Ce qui veut dire que tu devrais d'abord déterminer la liste des éléments qui satisfont tes critères, puis les charger via ton array. Ce n'est pas tout à fait le même boulot...

En espérant que quelqu'un va venir me contredire

[Franc]

Bonjour, il faut utiliser .AdvancedFilter.
Exemple: Range("A:G").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("I1:K3")
Range("A:G") étant la ligne contenant les entêtes de ton tableau à filtrer et Range("I1:K3") les critères du filtre, dont la ligne 1 contient les entêtes à filtrer.

[Joncy]

Merci beaucoup pour vos retours et votre aide !