Automatisation des champs d'un TCD

[Poussin]

Bonjour à tous,
Je souhaiterais apporter de nouvelles fonctionnalités pour mon outil, je voudrais maintenant que les champs de mon TCD se définissent automatiquement.

C'est-à-dire que le .CurrentPage = (le contenu d'une cellule) en effet après la mise en place du boucle for l'objectif serait d'avoir toutes les entreprises et ainsi obtenir un onglet par entreprise avec son propre TCD.

TCD1
PivotFields (Métier)
.CurrentPage = contenu de A1

PivotFields (Societe)
.CurrentPage = contenu de B1

TCD2
PivotFields (Métier)
.CurrentPage = contenu de A2

PivotFields (Societe)
.CurrentPage = contenu de B2

   With ActiveSheet.PivotTables("TCD2").PivotFields("Métier")
        .Orientation = xlPageField
        .Position = 1
        .CurrentPage = "Mouton"
   End With

Merci d'avance encore pour votre aide précieuse.

Cordialement

 

[Guest]

Re : Automatisation des champs d'un TCD

Bonjour,

Il me semble que tu as déjà un fil sur le sujet : https://www.excel-downloads.com/threads/personnaliser-son-tcd.167191/

Re lire la charte du forum.

A+

 

[Poussin]

Re : Automatisation des champs d'un TCD

Je souhaite seulement réorienter ma discussion et reformuler ma demande.

 

[Guest]

Re : Automatisation des champs d'un TCD

Re,

Ah Bon!

Demande autre discussion:

Bonjour JCGL,

Après ce WE, j'ai pu réfléchir à de nouvelles fonctionnalités pour mon outil, je voudrais maintenant que les champs se définissent automatiquement.

C'est-à-dire que le .CurrentPage = (au contenu d'une cellule) en effet après la mise en place du boucle for l'objectif serait d'avoir toutes les entreprises et ainsi obtenir un onglet par entreprise avec son propre TCD.

TCD1
PivotFields (Métier)
.CurrentPage = contenu de A1

PivotFields (Societe)
.CurrentPage = contenu de B1

TCD2
PivotFields (Métier)
.CurrentPage = contenu de A2

PivotFields (Societe)
.CurrentPage = contenu de B2

Merci d'avance encore pour ton aide précieuse.

Cordialement

Tu ne changes pas le sujet, c'est dans la continuité, suffisait de faire remonter ton fil.

A+

 

[Poussin]

Re : Automatisation des champs d'un TCD

OUI mais cela était juste une question pour une personne qui m'avait aidé jusque là, j'ai préféré refaire un topic pour que justement cela soit utile pour tout le monde !!!

 

[Guest]

Re : Automatisation des champs d'un TCD

Re,

Pour ça t'inqiète pas, nous sommes nombreux à regarder tous les topics!

A+

 

[Poussin]

Re : Automatisation des champs d'un TCD

Je n'en doute pas mais j'ai remarqué qu'à chaque fois que je le faisais j'obtenais plus de réponses et souvent la bonne.

 

[Guest]

Re : Automatisation des champs d'un TCD

Re,

Ce n'est pas une raison pour mutliplier les fils de discussion. Relire la charte.

A+

 

[JCGL]

Re : Automatisation des champs d'un TCD

Bonjour à tous,
Salut mon Ges,
Salut Poussin,

Hasco à raison, il n'est pas utile de "dédier" une discussion (une demande) à un membre précis.
Toute réponse, même si elle convient au demandeur, est susceptible d'être commentée, améliorée ou modifiée par un autre membre...

C'est la base d'un Forum d'Entraide, concept heureusement suivi sur XLD...

A++ mon Ges
A+ Poussin
A + à tous

 

[Dan]

Re : Automatisation des champs d'un TCD

Bonjour,

Je trouve très peu correct de poser les mêmes questions sur un autre forum sans avoir en quelque sorte la "délicatesse" de le signaler. Cela fait passer du temps sur des réponses en laissant en suspend d'autres demandes qui attendent une réponse.
Question déjà posée ici -> Automatisation des champs TCD : Excel - VBA

Merci d'au moins cloturer les fils si le sujet est clos.

A bientôt

 

[Poussin]

Re : Automatisation des champs d'un TCD

Bonjour à tous,

Je m'excuse pour toutes ces maladresses mais il me semblait plus efficace de multiplier les questions sur différents forums afin d'y trouver une réponse qui me correspondait. J'ignorais que les menbres pouvaient être les mêmes d'un forum à un autre. Pour en revenir à mon sujet, il n'est toujours pas clos. Je vais donc retourner sur l'autre forum pour continuer le sujet. Merci à tous pour vos conseils.

Bonne journée,

A bientôt