VBA Fonction de Tri multiple dans un Tableau TCD

Bonjour tout le monde,

Je dois créer un tableau de report d'activité trimestriel.
Mes contraintes sont que ce soit le plus automatique possible.
Pour simplifier ma base de donnée : j'ai des colonne à entête suivantes :
Entreprise / Statut (nouveau ou inactif sachant que rien = ok)/ date de changement de statut / montant

Je doit créer un TCD dynamique activé par bouton (trimestre 1'2'3'4 et annuel)
permettant de piloter le TCD sachant que :
Trimestre 1 = entreprises ayant un statut vide
Trimestre 2 = entreprises ayant un statut vide + nouveau ayant une date de changement <Avril 2015, - inactif ayant une date de changement <Avril 2015
Trimestre 3 = entreprises ayant un statut vide + nouveau ayant une date de changement <Août 2015, - inactif ayant une date de changement <Août 2015
Trimestre 4 = entreprises ayant un statut vide + nouveau ayant une date de changement <Décembre 2015,- inactif ayant une date de changement <Décembre 2015

Je n'ai jamais piloter de TCD par VBA, mais j'ai récemment découvert les segments, grouper et chronologie qui peuvent être utile.
Le but c'est d'activer cela par la pression d'un seul bouton.
Si vous avez des astuces, des conseils je suis tout ouiie

Merci beaucoup,

J-C

Bonjour,
Quel est le but quand tu dis "activer cela" ? Peut-tu donner un exemple ?
L'enregistrement automatique de macro peut te permettre d'obtenir le code pour changer les filtres / tris des TDC.

Déjà merci de ta réponse ;

Quand je dit "activer cela" : c'est activer les filtres correspondant aux différents trimestres
L'utilisateur sélectionne le trimestre qui l'intéresse, et les filtres correspondant se mettent en place.

D'accord donc je confirme mon premier message : en passant par l'enregistreur de macro et en adaptant, on peut arriver à ça :

Code:

---

1 2 3

Dim trimestre As String trimestre = "trimestre 3" Worksheets("Feuil1").PivotTables("Tableau croisé dynamique1").PivotFields("Trimestre").CurrentPage = trimestre

---

A toi d'adapter à ton code ensuite