Discussion :

[Newby00]

Bonjour à tous,

C'est mon premier post, j'espère que je suis conforme, sinon, n'hésitez pas à me le faire savoir !
Je suis aussi débutant sur le VBA dans Excel, n'hésitez pas à rappeler les basiques qui peuvent ne pas être connus

J'ai un fichier que je passe mon temps à filtrer sur différentes colonnes.
J'aimerai bien avoir des boutons qui me permettent un filtre multi critères.

J'ai initié cela et je suis sur la bonne voie, j'arrive au résultat souhaité (enfin presque).

J'ai quand même les problèmes suivants :
- Le bouton que j'ai inséré et sur lequel il y a la macro associée ne lance pas "réellement" la macro
- La page VBA s'ouvre automatiquement quand je clique sur le bouton
- Quand je lance la macro depuis la page VBA, il faut que je clique 2 fois pour que cela fonctionne.

Voici le code :

Sub ProjetsSuivi()

ActiveWorkbook.Worksheets("Date lancements clients").ListObjects("TAB_MEP").AutoFilter.ShowAllData

ActiveWorkbook.Sheets("Date lancements clients").ListObjects("TAB_MEP").Range.AutoFilter _
Field:=22, _
Criteria1:=">0"
ActiveWorkbook.Sheets("Date lancements clients").ListObjects("TAB_MEP").Range.AutoFilter _
Field:=6, _
Criteria1:="<>-"

End Sub

Avec cette macro, je souhaite :
- Enlever tous les filtres potentiels du tableau
- Filtrer la colonne 22 sur les valeurs supérieures à 0
- Filtrer la colonne 6 avec les valeurs différentes de "-"

J'ai mis le fichier anonymisé pour que ce soit peut-être plus facile de visualiser le problème

[Franc]

Bonjour, le problème vient de ton paramètre Field:=22, c'est à dire la colonne V, or ton tableau s'arrête à la colonne Q, d'où l'erreur et donc l'affichage de la fenêtre VBA pour signaler l'erreur.
J'ai testé la macro avec Field:= 14 par exemple, et ça fonctionne très bien. Les 2 boutons lancent la macro (pourquoi 2 boutons pour lancer la même macro ?)

[Newby00]

Merci à toi Franc, effectivement c'est parfait, je ne sais pas comment je me suis loupé autant sur un point aussi facile.
Il y a 2 boutons car je vais effectuer d'autres filtres par la suite, mais j'étais bloqué à la première étape alors j'ai mis en pause la suite.

Merci beaucoup pour ton aide en tout cas.