Change Pivot table

Bonjour,

J'aimerais, à l'aide d'une macro, modifier le filter de la date d'une pivot table. Donc à chaque ouverture du fichier excel faire en sorte que la date soit modifier à la veille. Par exemple si j'ouvre le fichier le 02/12/2014 le filter doit indiquer 01/12/2014.

J'ai pour commencer cette macro :

Sub changedate()

'

' changedate Macro

'

ActiveSheet.PivotTables("PivotTable1").PivotFields( _

"[DIM GAS DAY HOUR].[GAS DAY DATE].[GAS DAY DATE]").VisibleItemsList = Array( _

"[DIM GAS DAY HOUR].[GAS DAY DATE].&[2014110501]")

End Sub

Le hic c'est que je ne parviens pas à modifier la partie rouge pour la rendre dynamique. Quelqu'un peut m'aider ?

Merci d'avance

Personne pour m'orienter ?

J'ai essayé avec today()-1 ; now ; ... mais il ne veut rien prendre !

onsoir,

Merci de joindre un fichier.

Cdlt.

Pas possible ... ma table est liée à des connexions externes et une db particulière qui ne fonctionnent que dans un certain environnement.

Par contre si la question n'est pas claire je pourrais la paraphraser si nécessaire.

Merci

RE,

Envoie donc un fichier représentatif et anonymisé.

Cdlt.

Voici un fichier

Le but étant donc lorsque j'ouvre le fichier que la macro fasse en sorte que le tableau croisé dynamique se mette sur la date de la veille !

Merci.

18test.xlsb (12.03 Ko)

Re,

Tu trouveras certainement une aide, mais pas la mienne ce jour.

Bye.

Merci d'y avoir jeté un oeil !

Bonne soirée

Au pire je me débrouillerai autrement

Il existe une petite astuce sans macro... pour celui que ça intéresserait un jour faites moi signe !

Rechercher des sujets similaires à "change pivot table"