Afficher/Masquer des items dans TCD VBA

Bonjour,

J'ai un TCD où je souhaite masquer une variable mais la macro ne fonctionne pas, voici le code :

Dim x as Integer

x = Sheets("BDD2").Range("A22")

Sheets("BDD retravaillé").Select

ActiveSheet.PivotTables("1").PivotFields("N°").ClearAllFilters
With ActiveSheet.PivotTables("1").PivotFields("N°")
.PivotItems("(blank)").Visible = False
.PivotItems("").Visible = False

.PivotItems("x").Visible = False


Je comprends que cette variable "x" n'est pas reconnu dans la VBA et donc le filtre ne se fait pas dans le TCD, de plus il faudrait que si la valeur "x" ne correspondent à aucune valeur du TCD, celle-ci ne bug pas. Le début fonctionne très bien, mais l'introduction de cette variable bloque.


Merci d'avance !

Bonjour

Merci de mettre vos codes entre balises... j'ai corrigé sur votre post


J'ai un TCD où je souhaite masquer une variable

heu...masquer une variable ?? je suppose que vous voulez dire masquer la valeur de variable dans le TCD

1. Vous avez quoi en A22 ?
2. Pourquoi cette ligne --> .PivotItems("").Visible = False

Voyez ce lien éventuellement --> https://forum.excel-pratique.com/s/goto/326293

Cordialement

Rechercher des sujets similaires à "afficher masquer items tcd vba"