Création d'un TDC à partir d'un bouton et MAJ automatique
Bonjour à tous,
Je souhaiterai obtenir un TDC à partir d'un bouton que j'ai crée sur mon classeur.
le bouton TDC devrait creer et afficher le TDC dès que je clique dessus pour le tableau de CAEN-Lot 1.
1- j'ai déjà créer le bouton avec l'outil développeur puis insérer bouton contrôle formulaire.
2- j'ai utilisé l'icône Visual basic pour mettre le code suivant .
Sub CreerTCD()
ThisWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
[CAEN-Lot 1!A1].CurrentRegion.Address(, , xlB2J35, True)).CreatePivotTable _
TableDestination:="RECAP Prises non livrées!D16", _
TableName:=" TCD"
With RECAP Prises non livrées.PivotTables(" TCD")
.AddFields RowFields:="TCD"
End With
End Sub
Cependant mon code ne fonctionne pas parceque je n'arrive pas à faire le lien entre le code et le bouton..
Serait -ce par incompréhension du code
Pourriez -vous m'aidez dans ce sens s'il vous plait.
Je vous remercie d'avance
Bonjour
Ou as tu mis la macro ? Je ne la trouve pas.
Ce n'est pas un fichier xlsm (fichier excel prenant en charge les macros)
Bonjour,
c'est une fichier xlsm mais je peux pas le poster parceque celà affiche "L’extension xlam n’est pas autorisée."
y'a t-il un moyen de tout mettre sur un même fichier excel?
Merci pour votre réponse
Pour ca, je ne peux pas te renseigner, malheureusement
Par contre, je peux te dire que pour affecter une macro à un boutton, normalement, il suffit de faire un clic-droit sur le boutton, et "Affecter une macro". Avais tu essayé ca ?
oui j'avais essayer je mets le fichier en zip.
Je pense que mon code ne doit pas être le bon j'ai essayé d'adapter par rapport à ce qui était donner sur le forum ça passe pas.
ci-joint le fichier en question.
Peux tu re-enregistrer ton fichier, nom pas en format .xlam, mais en .xlsm
voici le xlsm
J'ai changé ton code VBA et affecté la macro au boutton
Maintenant, qd tu cliques sur le bouton, ca va créer le Tableau croisé dynamique. Cependant, tu peux pas recliquer dessus pour recréer un autre TCD car dans le code VBA, on creer une feuille "TCD" (et il est impossible de creer une deuxieme feuille avec le meme nom), et le "tableau croisé dynamique 3" (et il est impossible de créer un autre "tableau croisé dynamique 3", il faudrait "tableau croisé dynamique 4", 5, etc.)
Que veux tu que le bouton fasse qd tu cliques dessus ?
Merci Julien
En faite lorsque je clique sur le bouton TCD ayant pour base de données CAEN-Lot 1 par exemple je dois obtenir un recap .
mon objectif est : dès que je mets à jour la base CAEN par exemple ,le TCD se met également à jour de ce faite n'importe qui dans mon équipe aura juste à appuyer sur le bouton pour avoir une synthèse.
je ferai pareil pour les autres villes .
Encore thanks
Fait plaisir !
Dans ce cas, il suffit d'actualiser les données. Cela va mettre à jour automatiquement les tableaux croisés dynamiques.
Tu as deux possibilités : (peut etre davantage, mais voila ce que j'ai à proposer) :
- Dans le menu "DONNÉES", tu cliques sur "Actualiser Tout".
- Sinon, tu créé un autre bouton avec ce code :
Sub refresh()
ActiveWorkbook.RefreshAll
End Sub
C'est le code VBA pour "Actualiser Tout"
Laisse moi savoir si ca répond a ta question
Bonsoir
Lilou89, pas très sympa ça
Tu pourrais nous le dire quand tu cherches sur d'autres forums
Je pense oui ça répond à ma question
Je pense également avoir compris quoi faire pour le reste .
je refais le code Demain.
Bonne soirée Julien
Parfait, bonne soiree, et peut etre a demain
BrunoM45 a écrit :Bonsoir
Lilou89, pas très sympa ça
Tu pourrais nous le dire quand tu cherches sur d'autres forums
Bruno45
Ok d'accord je m'en excuse il fallait que je résous en urgence ces problèmes pour demain . Maintenant que c'est fait je reste sur Excel-pratique.