libellule85
XLDnaute Accro
Bonjour le forum,
J'aurais une nouvelle fois besoin de vos lumières. En effet, j'ai créé un tableau croisé dynamique et au lieu d'aller à chaque fois dans le ruban pour réduire ou développer les champs je désire mettre ces commandes dans un même label :
(Les champs à développer/réduire se situent de A3 à A400)
- développer le champ entièrement
- réduire le champ entièrement
Quelqu'un pourrait me dire comment faire,
Vous en remerciant par avance
J'aurais une nouvelle fois besoin de vos lumières. En effet, j'ai créé un tableau croisé dynamique et au lieu d'aller à chaque fois dans le ruban pour réduire ou développer les champs je désire mettre ces commandes dans un même label :
(Les champs à développer/réduire se situent de A3 à A400)
- développer le champ entièrement
Code:
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur") _
.ShowDetail = True
Code:
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur") _
.ShowDetail = False
Quelqu'un pourrait me dire comment faire,
Vous en remerciant par avance