Salut à tous,
Je m'arrache les cheveux sur le problème suivant: j'ai une macro qui fait tourner un filtre. Si je hardcode le criteria1 tel que
Ca roule et ma table est bien filtrée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part ActiveSheet.Range("$A$1:$V$2061").AutoFilter Field:=4, Criteria1:=Array("Assets", "Consumables"), operator:=xlFilterValues
MAIS en fait la valeur de mon array dépend de la sélection d'élément dans un listbox. Si mon Assest est dans la cellule F6 de la feuille 30 et mon consumables dans la cellule G6, je tente de prendre la valeur de mon array de ces cellules mais ca ne marche pas:
Je n'ai pas de message d'erreur, juste aucun résultat n'apparaît dans ma table filtrée. Si je compare la valeur de FilterValue dans mon message box, j'ai bien la meme chose que dans mon premier cas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Dim FilterValue As String Dim quot As String quot = "''" FilterValue = quot & Sheet30.Range("F6").Text & quot & ", " & quot & Sheet30.Range("G6") & quot MsgBox (FilterValue) ActiveSheet.Range("$A$1:$V$2050").AutoFilter Field:=6, Criteria1:=Array(FilterValue), Operator:=xlFilterValues
Apparemment personne ne fait la meme chose que moi quand je google, donc si quelqu'un à une autre idée, tant mieux.
Merci d'avance
Partager