Discussion :

[Orda80]

Bonjour,

je suis en train d'automatiser des TCD en VBA, j'ai réussie jusqu'au maintenant toute les étapes, mais je suis bloquée pour l'affichage, normalement je fais ça manuellement "cliquer sur le tableaux" -> "Option Tableau croisé dynamique" -> "Affichage" -> couché "disposition classique du Tableau croisé dynamique"

je cherche comment appliquer l'option "disposition classique du Tableau croisé dynamique" sur VBA.

J’espère que quelqu'un à une réponse pour ce sujet.

Je vous remercie par avance


Orda

[zenpbb]

Bonjour,
Et si tu fais la manip en enregistrant une macro, le code généré ne te convient pas ?

[halaster08]

Bonjour,

D'après l'enregistreur de macro:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    With ActiveSheet.PivotTables("Tableau croisé dynamique1")
        .InGridDropZones = True
        .RowAxisLayout xlTabularRow
End With

[Orda80]

Bonjour halaster,

il fonction très bien merci beaucoup

Orda