[Résolu] [Calc] Multi Filtres et multi choix dans une table dynamique

[SolPro]

Bonjour à tous
Cela fait plusieurs jours que je cherche, recherche... en vain

J'ai un tableau de 30 000 lignes environ à gérer. Dans l'exemple que je donne, j'ai supprimé beaucoup de colonnes, de lignes et anonymisé le tout.
Je voudrais via une macro générer une table dynamique (jusque là, j'y arrive) et ajouter des filtres (là, je ne suis en mesure que d'ajouter qu' un seul filtre).

Mon souci : je voudrais par macro, mettre 2 filtres et si possible pour chaque filtre, via macro sélectionner l'option du filtre
J'arrive à tout cela "hors macro" mais je ne suis pas l'utilisateur final.

tabledynamique_1.png

On voit bien mes 2 filtres et c'est ce que je veux mais par macro je n'arrive à en avoir qu'un seul ! qui plus est, je voudrais pouvoir par macro déjà proposer le contenu du filtre comme ceci (coche). Dans mon fichier, la macro permet d'obtenir le contenu de l'onglet "Semestre_1"

tabledynamique_2.png

Ci-joint le fichier en question avec le code basic (trouvé sur ce forum et adapté par mes soins)

Un grand merci d'avance.

donnee.ods

[Dude]

Salut,

Après avoir installé zBasic, créer un TCD est relativement simple.
Pour ton cas :

Code : Tout sélectionner

Sub Main
	GlobalScope.BasicLibraries.loadLibrary ("zBasic")
		
	oTCD = zTCD.Demarre("TCD_zBasic", "Brut", "A1:G21")

	zTCD.Parametre(oTCD, "total_colonnes", 1)
	zTCD.Parametre(oTCD, "total_lignes", 1)	
	
	zTCD.Champ(oTCD, "ligne", 1) 'Nom
	zTCD.Champ(oTCD, "ligne", 3) 'Titre
	zTCD.Champ(oTCD, "ligne", 4) 'Categorie
	zTCD.Champ(oTCD, "page", 5) 'Agir_?
	zTCD.Champ(oTCD, "page", 2) 'Objet
	zTCD.Champ(oTCD, "donnée", 7) 'Montant du principal

	zTCD.Info(oTCD, "filtre", 5, "selection", "oui")
	zTCD.Info(oTCD, "filtre", 2, "masque_item", "ordures menageres 2eme semestre 2022")
	zTCD.Info(oTCD, "filtre", 4, "masque_item", "P_M_Dt_Public")
	zTCD.Info(oTCD, "filtre", 4, "masque_item", "P_M_Dt_Prive")

	zTCD.Execute(oTCD, "A_obtenir_par_macro", "A14")
End Sub

[SolPro]

Bonsoir
merci pour la solution fournie.
Je vais regarder la partie "intégration" car la macro sera exécutée par x personnes sur des postes dépourvues de l'extension et cela sera compliqué pour les collègues....
Je passe en résolu et je vais lire les infos relatives à cette extension