Filtre Plusieurs TCD VBA

Home – Le CFO masqué › Forums › VBA › Filtre Plusieurs TCD VBA

Tagged: 

Viewing 6 posts - 1 through 6 (of 6 total)
  • Author
    Posts
  • 1 May 2018 at 5 h 04 min #42912
    Marie MM
    Participant

    Bonjour à tous ,

    Je cherche à filtrer 2 TCD avec une macro / VBA via une zone de liste déroulante
    J’ai fait un fichier Excel assez simple ci-joint.
    Je ne veux pas utiliser de segment car j’ai plusieurs feuilles à construire avec plusieurs bases de données différentes, mais toutes peuvent être filtrer par le champs : nom du consultant.
    Mon code vba doit être faux
    Je voudrais lorsque nous sélectionnons « consultant 1 » dans la liste déroulante que les deux TCD soient automatiquement filtrés par « Consultant 1 »

    Mon code :
    Sub Zonecombinée1_QuandChangement()
    ‘
    ‘ Zonecombinée1_QuandChangement Macro
    ‘
    ActiveSheet.PivotTables(“PivotTable1”).PivotFields(“Nom Consultant”).ClearAllFilters
    ActiveSheet.PivotTables(“PivotTable1”).PivotFields(“Nom Consultant “).CurrentPage = ActiveSheet.Range(“C2”).Value
    ActiveSheet.PivotTables(“PivotTable2”).PivotFields(“Nom Consultant “).ClearAllFilters
    ActiveSheet.PivotTables(“PivotTable2”).PivotFields(“Nom Consultant “).CurrentPage = ActiveSheet.Range(“C2”).Value
    End Sub

    Excel me dit : Impossible de lire la propriété PivotTables dans la classe Worksheet

    Je n’ai jamais fait de Macro ni de vba …..
    Ci-joint mon fichier
    Merci pour votre aide

    Attachments:
    You must be logged in to view attached files.
    1 May 2018 at 11 h 22 min #42919
    Sophie Marchand
    Participant

    Bonjour,

    Je montre plusieurs façons de faire dans l’article suivant: https://www.lecfomasque.com/controler-plusieurs-tableaux-croises-dynamiques-avec-un-seul-menu-deroulant/.

    Au plaisir,

    Sophie

    1 May 2018 at 11 h 45 min #42921
    Marie MM
    Participant

    Bonjour Sophie,

    Oui je vous remercie , c’est d’ailleurs grâce à vous que j’ai eu l’idée de faire cela et grâce à votre article.

    J ai été séduite par vos idées mais la macro/ le code vba ne fonctionne pas !

    Donc je suis coincée

    Marie

    1 May 2018 at 16 h 39 min #42925
    Sophie Marchand
    Participant

    Bonjour,

    Vous aviez 2 erreurs dans votre code.

    Premièrement, le nom de vos tableaux croisés dynamiques étaient en français et non en anglais. J’ai donc modifié le tout.

    Ensuite, il y avait des espaces en trop dans la mention du champ Nom Consultant.

    En corrigeant ces 2 éléments, les 2 tcd peuvent maintenant être contrôlés par le même menu.

    Au plaisir,

    Sophie

    Attachments:
    You must be logged in to view attached files.
    2 May 2018 at 1 h 30 min #42929
    Marie MM
    Participant

    Bonjour Sophie

    Un grand merci pour votre aide !

    Si cela vous intéresse et aussi vos abonnés , ci joint une autre solution .

    Excellente journée.

    Marie

    Attachments:
    You must be logged in to view attached files.
    12 June 2019 at 7 h 49 min #55619
    Lauriedvldr
    Participant

    Bonjour Sophie,

    J’essaye d’utiliser le même code. Cependant, je fais face à une erreur bloquante:

    Erruer d’exécution 1004
    Impossible de définir la propriété CurrentPage de la classe PivotField

    La macro fonctionne pour “vider” la sélection du filtre actuelle, mais n’insère donc pas la sélection souhaitée.

    Je vous remercie par avance pour votre rapide réponse.

    Bien cordialement,

    Laurie-Anne

  • Author
    Posts
Viewing 6 posts - 1 through 6 (of 6 total)
  • You must be logged in to reply to this topic.