Filtre elaboree avec une macro

Bonjour

Je souhaite créer une macro qui fait un filtre élaboré avec une variable

Les données de l'exemple peuvent varier mais je veux simplifier au maxi la tâche à mes collègues pour qu'ils aient simplement à coller leur fichier et mettre leur zone de critère. Simplement, je ne suis pas assez douée en vba pour faire cela. Donc j'ai besoin de vos connaissances.

J'ai trouvé un bout de code mais qui ne fonctionne pas trés bien.

Sub test()

Dim Ws As Worksheet

Set Ws = Worksheets("Feuil1") 'à modifier en fonction du nom réel de la feuille cible.

Ws.Range("A1:B66000").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _

Ws.Range("E1:F2"), CopyToRange:=Ws.Range("E9:F9"), Unique:=False

End Sub

Dans ce cas précis, je veux demander à l'utilisateur de choisir dans la colonne 1 toutes les refs qui commencent par "LCS3 et dans la zone de critère toutes les refs qui commencent par VAL + HEL+NIS+AUT.

Je vous mets en PJ ma demande.

Merci pour votre aide

bonjour

sans VBA, sans formule, sauf colonne de pointage GAUCHE()

avec un simple TCD

utiliser soit le segment (selon version d'Excel, soit la zone de filtre de colonne du TCD

Rechercher des sujets similaires à "filtre elaboree macro"