Filtre Textuels

Bonjour,

Je souhaite appliquer un filtre textuel "contient" sur une colonne avec 4 choix textuels. Actuellement seulemebt deux choix sont possibles.

Merci

Bonjour,

Un filtre élaboré devrait pouvoir le faire,

envoie une feuille exemple

Amicalement

Claude

Bonjour,

En lisant l'explication des filtres élaborés c'est effectivemment ce qu'il me faut...

Par contre je n'arrive pas à l'utiliser

Voilà un test....

Ma zone de critères au dessus et mon tableau qui doit être filtré....

Merci pour votre aide

Bonjour,

Dans la plage "critère", il faut mettre l'en-tête de la colonne à filtrer.

Sub Filtre()
Dim Lg&
Call AfficherTout
    '--- filtre ---
    Lg = Range("a" & Rows.Count).End(xlUp).Row  'dernière ligne
    Range("a7:d" & Lg).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Range("d1:d5"), Unique:=False
End Sub

Sub AfficherTout()
    On Error Resume Next
        ActiveSheet.ShowAllData                 'libère le filtre
    On Error GoTo 0
End Sub

Bonne journée

Claude

Génial et merci pour le petit plus

Bonne journée