With ActiveSheet.PivotTables("ConsultantsDOC").PivotFields("Période")
Ø .PivotItems(PERIODEANNEEP).Visible = False
.PivotItems(PERIODEANNEE).Visible = True
End With
Il me semble que le problème soit issu du format date lui-même. En effet, j'ai testé et cela fonctionne quand le "Pivotitem" est avec des lettres ou encore des chiffres.
Attention, je n'ai pas défini en amont les variables, ni leur format.
J'ai essayé en modifiant le format du champ qui m'interresse du format "date" au format "string" et, ceci même dans la base de données du TCD ...
Cela bute toujours.
Comment puis-je pallier à ce problème tout en conservant le format date (si possible) ?