Discussion :

[kyros21]

Bonjour à tous,

je rencontre un problème dans ma macro, je souhaite pouvoir appliquer un filtre sur une plage donné, mais qui est amené à changer régulièrement. Mes critères de filtrage se situe dans un autre onglet, et j'ai du coup essayé d'appliquer le filtrage automatique comme ceci :

Code :

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

1
2
3
4
5
Dim plage_pieces As Variant
With Worksheets("Planning appel-réception pièces")
    plage_pieces = Chr$(34) & ConcatPlageCelNonVides(.Range("E15", "E" & .Range("E" & Rows.Count).End(xlUp).Row), """, """) & Chr$(34)
    MsgBox plage_pieces
End WithWorksheets("PAP SC").Cells(1, 1).AutoFilter Field:=4, Criteria1:=Array(plage_pieces), Operator:=xlFilterValues

Sauf que le problème rencontré est que si je tape le code comme ci-dessus, le filtrage ne marche pas. alors qu'en remplaçant la variable plage_cellules, par une variable texte entre "" mais strictement égale à ce que contient la variable plage_cellules, et bien cela fonctionne. Comment se fait-il qu'avec une variable cela ne fonctionne pas ? Sachant que je dois obligatoirement passer par une variable car la liste de critère change continuellement.

Merci pour votre aide.

[AlainTech]

Bonjour,

Que contient la variable plage_pieces?
Et pourquoi la déclarer en Variant alors que c'est pour contenir une String?

[NVCfrm]

Bonjour,
Une absence de retour chariot sur la dernière ligne de ton code.

Bonjour à tous,
...
Sauf que le problème rencontré est que si je tape le code comme ci-dessus, le filtrage ne marche pas. alors qu'en remplaçant la variable plage_cellules, par une variable texte entre "" mais strictement égale à ce que contient la variable plage_cellules, et bien cela fonctionne...
Merci pour votre aide.

Tu veux dire une chaîne en dur ?
Peux-tu donner un exemple de cette chaîne qui, j'en ai l'impression ne correspond pas à la construction que tu as faite.

[Invité]

Bonjour,
regarde ça: http://www.developpez.net/forums/d13...s/#post7481714