Filtre vba

[Mali201604]

Bonjour le forum,

J'ai utilisé le filtre de mon tableau croisé dynamique,
le problème c'est que quand les données changent la macro se bloque

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Compte"). _
CurrentPage = "(All)"
With ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Compte")
.PivotItems("411000131").Visible = False
.PivotItems("437500000").Visible = False
.PivotItems("512100000").Visible = False
.PivotItems("627100000").Visible = False

J'aimerai enfaite qu'il affiche seulement de 401000000 à 401999999 même si tout les comptes ne sont pas présent

( je ne sais même pas si je suis clair )

 

[gosselien]

Re : Filtre vba

Bonjour,

pas de TCD dans ce que tu envoies

P.

 

[Mali201604]

Re : Filtre vba

Oui le TCD est dans la macro

 

[gosselien]

Re : Filtre vba

Bonjour à tous,

un essai avec une ou l'autre modif

P.

 

[Mali201604]

Re : Filtre vba

Merci beaucoup j'ai utilisé le filtre pour l'autre TCD du coup.

Et tu indiques qu'il est possible de faire un champ calculé ?

 

[gosselien]

Re : Filtre vba

Oui , assez facilement..
Voilà un 2e tcd avec 2 champs calculés

P.

 

[Mali201604]

Re : Filtre vba

Merci beaucoup pour l'info
Maintenant ça donne ça


J'ai encore une petite question

Dans ' Total tva ded et tva Collectée

Je selectionne une cellule mais j'aimerai que ça selectionne le TOTAL (qui ne sera pas toujours la même celulle)