XL 2010 TCD VBA filtre multiple

[sebastien450]

Bonjour,

Je cherche depuis un moment, pour filtrer sur selection multiples (la difficulté réside ici), sur variable contenue dans une cellule.

J'arrive à faire un filtre simple, mais pas multiple, j'ai pourtant essayé les zones nommées ect ect...

merci a vous

 

[sebastien450]

Re : TCD VBA filtre multiple

Ma proposition :

varia1 = Range("I3")
varia2 = Range("I4")
varia3 = Range("I5")
varia4 = Range("I5")
varia5 = Range("I6")
'
ActiveSheet.ChartObjects("Graphique 1").Activate
With ActiveChart.PivotLayout.PivotTable.PivotFields("moule")
.PivotItems(varia1).Visible = True
.PivotItems(varia2).Visible = True
.PivotItems(varia3).Visible = True
.PivotItems(varia4).Visible = False
.PivotItems(varia5).Visible = False
End With