Ajouter un filtre à une pivot (cubeField)

Bonjour,

J'essaye depuis quelques jours d'ajouter un filtre et de le definir dans ma pivot Table via VBA.
Derriere ma pivot j'ai un cube Olap. Donc je dois récupérer le field de la.
Pour cela je fais un "CreatePivotFields" sur mon cubeField.
Mais arrivé la, je ne sais pas comment setter ce field en filtre et lui donner des valeurs.

Je suis obligé de faire ca en VBA, c'est pour automatiser des modifications.
Bref si quelqu'un a un bout de code ou une idée je suis preneur!!

Merci