Bonjour à tous,
Pour ceux qui manipulent des TCD et qui seraient intéressés.
Ci-joint un exemple de récupération des paramètres des TCD qui affiche les informations de lignes, colonnes, champs, corps, totaux ainsi que tous les champs utilisés ou non.
Adaptation à votre projet :
- dans l'éditeur VBA faites un glisser/déposer du module TCD_Param dans votre projet
- renommer les feuilles du type Sh_XXXX ou autrement (exemple : Sh_TCD_ENS)
- utiliser ou renommer les TCD (exemple : TCD_ENS)
Exemple de procédure d'appel :
Sub TCD_Parametres_Ensemble()
' paramètres du TCD après son actualisation
' Call TCDparam("nom classeur", "Nom feuille", "Noms du TCD")
Call TCDparam(ThisWorkbook.Name, Sh_TCD_ENS.Name, "TCD_Ens")
TCD_Param_Affichage
End Sub
Bonne utilisation
Robert
Pour ceux qui manipulent des TCD et qui seraient intéressés.
Ci-joint un exemple de récupération des paramètres des TCD qui affiche les informations de lignes, colonnes, champs, corps, totaux ainsi que tous les champs utilisés ou non.
Adaptation à votre projet :
- dans l'éditeur VBA faites un glisser/déposer du module TCD_Param dans votre projet
- renommer les feuilles du type Sh_XXXX ou autrement (exemple : Sh_TCD_ENS)
- utiliser ou renommer les TCD (exemple : TCD_ENS)
Exemple de procédure d'appel :
Sub TCD_Parametres_Ensemble()
' paramètres du TCD après son actualisation
' Call TCDparam("nom classeur", "Nom feuille", "Noms du TCD")
Call TCDparam(ThisWorkbook.Name, Sh_TCD_ENS.Name, "TCD_Ens")
TCD_Param_Affichage
End Sub
Bonne utilisation
Robert
Dernière édition: