Ver originales (Francés)

¿Cómo filtrar varias tablas dinámicas al mismo tiempo?

k'rsten Mensajes publicados 9 Estado Miembro -  
k'rsten Mensajes publicados 9 Estado Miembro -
Bonjour,

est-ce que vous pouvez m'aider avec Excel ?
J'ai une dizaine de tableaux croisés dynamiques dans le même onglet, et ils ont tous les mêmes filtres et sous-filtres (dans l'onglet de page du TCD).
Est-il possible de modifier l'ensemble des filtres de mes TCD en quelques clics ?
Par exemple, j'ai des filtres allant de f1 à f10 et des sous-filtres allant de sf1 à sf10 pour chaque TCD. Je voudrais rapidement filtrer tous mes TCD sur f3 et sf4 (par exemple). Est-ce faisable ?

Merci de votre aide, ça me ferait gagner énormément de temps !!

Bonne journée 
Configuration : Windows XP Internet Explorer 6.0

6 respuestas

  1.
    pépé35530 Mensajes publicados 2951 Fecha de registro   Estado Miembro Última intervención   1 390
     
    He encontrado esto en un sitio:

    Bueno, creo que he encontrado la solución a mi problema.

    Aquí está el código:

    Sub MAJ_Niveau_Dim_Agence()

    '*********************
    ' Esta macro aplica la agencia del primer TCD (MasterPivotTable) a todos los
    otros TCD de una página
    '*********************

    Dim VarEtabl As String
    VarEtabl =
    ThisWorkbook.ActiveSheet.PivotTables("MasterPivotTable").PivotFields("[Agence]").CurrentPageName
    ' la variable VarEtabl corresponde al nombre de la agencia en formato MDX
    '******************

    ActiveSheet.PivotTables(1).PivotFields("[Agence]").CurrentPageName = VarEtabl
    ' Se aplica el nombre de la agencia en formato MDX a todos los TCD de la página
    '******************
    End Sub

    Espero que esto pueda servir a alguien más.
    Stan

    ¡Hasta luego!

    pépé
    1