libellule85
XLDnaute Accro
Bonsoir le forum,
J'aimerais faire avec un même bouton (ou forme) Réduire et Déployer les champs dans un TCD. Avec l'enregistreur de macro j'ai les deux actions séparées (ci-dessous) : comment faire pour les réunir ?
D'avance merci pour votre aide.
J'aimerais faire avec un même bouton (ou forme) Réduire et Déployer les champs dans un TCD. Avec l'enregistreur de macro j'ai les deux actions séparées (ci-dessous) : comment faire pour les réunir ?
Code:
Sub Macro1()
Range("A6").Select
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"Libellé de l'écriture").ShowDetail = False
End Sub
Sub Macro2()
Range("A6").Select
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"Libellé de l'écriture").ShowDetail = True
End Sub
D'avance merci pour votre aide.
Dernière édition: