Microsoft 365 Afficher Masquer tableau selon critères + MàJ Autom. TCD en VBA

[Amilo]

Bonjour à tous,
J'aurais svp besoin de votre aide pour :

1- Afficher/Masquer les lignes d'un tableau selon 2 cellules D8 et E8 tout en tenant compte du Slicer
j'ai mis dans cet exemple un bouton de bascule ActiveX mais pas certain que ce soit le meilleur choix
J'aimerais pouvoir mettre une couleur de fond mais moins évident à faire à mon niveau pour ce bouton de contrôle

2- Automatiser tous les tableaux croisés dynamique lors du passage à l'onglet "TCD"

Merci par avance
Cordialement

 

[goube]

Bonsoir,
Une proposition.
Cordialement

 

[Amilo]

Bonjour @goube ,
Merci bcp pour votre réponse,
L'idée avec 2 boutons est bonne.
Cependant, le filtre de votre code agît sur un TCD alors que dans mon fichier je dispose d'un tableau
Certaines colonnes de ce tableau sont amenées à changer via la saisie manuelle.
Comment l'adapter svp pour que soit filtrer uniquement le tableau ?
Merci par avance
Cordialement