Microsoft 365 Filtrer un TCD à partir de cases à cocher

pepeboy

XLDnaute Nouveau
Bonjour,
j'ai un tableau croisé dynamique sur un onglet, les données sources un autre onglet dans un tableau nommé... tableau.
Ce tableau contient 13000 lignes et 43 colonnes.
J'ai des filtres fixés (intégré au TCD) sur plusieurs (5) de ces colonnes.

Je souhaite mettre en place d'autres filtres mais cette fois à partir de cases à cocher, ces cases à cocher intégrées dans un formulaire qui serait appelé à l'ouverture du fichier et ancré sur la feuil1 (peut être le formulaire est inutile, les cases intégrées directement sur la feuille?).
Je pourrais insérer des segments, mais ce n'est pas ce que je souhaite ici.

Donc VBA.
J'ai commencé avec un filtre qui présente 3 critères possibles sur le champs, ce à partir de 3 boutons donc. Chaque bouton fonctionne bien indépendamment. Mais je voudrais pouvoir cumuler 2 choix, c'est pour ça que je me dirige vers les cases à cocher.

VB:
Private Sub CommandButton1_Click()
        ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
        "[Tableau].[Tier 3].[Tier 3]").VisibleItemsList = Array( _
        "[Tableau].[Tier 3].&[[B]IPP[/B]]")
End Sub

Private Sub CommandButton2_Click()
        ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
        "[Tableau].[Tier 3].[Tier 3]").VisibleItemsList = Array( _
        "[Tableau].[Tier 3].&[[B]Marine[/B]]")
End Sub

Private Sub CommandButton3_Click()
        ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
        "[Tableau].[Tier 3].[Tier 3]").VisibleItemsList = Array( _
        "[Tableau].[Tier 3].&[[B]OG[/B]]")
End Sub


Si les cases 1 et 2 sont cochées, ça filtre sur sur IPP et Marine.
Si on décoche 1, le tri est fait sur seulement Marine.
etc... avec les 3 cases à cocher.
j'ai limité à 3 ici ce pourrait être plus.

Mieux encore, ce serait que les cases à cocher ce créé automatiquement dans le formulaire en fonction de chacun des critères du filtre. Si dans un champs il y a 5 critères de filtre, alors 5 cases à cocher sont intégrés dans le formulaire.

A partir de ça je pourrais réalisé ce que je souhaite et poursuivre mon développement sachant que j'ai d'autres idées de tris et filtres qui se baseront sur le codes ci-dessus.

Merci de votre aide.
 

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 943
Membres
101 849
dernier inscrit
florentMIG