A voir également:
- Bouton de commande pour actualisation tcd sur une feuille protégée
- Bouton de commande pour actualisation tcd sur une feuille protégée ✓ - Forum - Excel
- Actualiser/Modifier filtres TCD dans une feuille protégée ✓ - Forum - Excel
- Vba actualiser tcd ✓ - Forum - VB / VBA
- Macro pour actualiser tous les TCD d'un classeur ✓ - Forum - Excel
- Macro actualiser tcd ✓ - Forum - Excel
7 réponses
Raymond PENTIER
- Messages postés
- 51898
- Date d'inscription
- lundi 13 août 2007
- Statut
- Contributeur
- Dernière intervention
- 9 juillet 2020
Bonjour.
Avant d'aller plus loin, et pour être sûrs qu'on parle bien des mêmes choses, il s'agit bien de plusieurs classeurs, c'est-à-dire des fichiers différents ?
Et tu veux un bouton dans le fichier "Menu" :
- qui ira chercher dans le disque dur les différents classeurs concernés, dans leurs répertoires,
- qui saura quel est le mot de passe de chacun de ces fichiers,
- qui va donc enlever la protection de chaque classeur,
- qui va lancer l'actualisation de tous les TCD contenus dans ces fichiers dé-protégés ?
Il faudra trouver un très grand spécialiste de la programmation en VBA pour arriver à écrire une macro capable de faire tout cela !
Avant d'aller plus loin, et pour être sûrs qu'on parle bien des mêmes choses, il s'agit bien de plusieurs classeurs, c'est-à-dire des fichiers différents ?
Et tu veux un bouton dans le fichier "Menu" :
- qui ira chercher dans le disque dur les différents classeurs concernés, dans leurs répertoires,
- qui saura quel est le mot de passe de chacun de ces fichiers,
- qui va donc enlever la protection de chaque classeur,
- qui va lancer l'actualisation de tous les TCD contenus dans ces fichiers dé-protégés ?
Il faudra trouver un très grand spécialiste de la programmation en VBA pour arriver à écrire une macro capable de faire tout cela !
kingsarky
Bonjour,
Désolé, en fait, il s'agit de plusieurs feuilles d'un même classeur Excel qui comporte environs 9 TCD que je voudrais actualiser via un bouton de commande.
J'espère avoir été plus précis et plus clair
Encore Merci !
Désolé, en fait, il s'agit de plusieurs feuilles d'un même classeur Excel qui comporte environs 9 TCD que je voudrais actualiser via un bouton de commande.
J'espère avoir été plus précis et plus clair
Encore Merci !
cs_Le Pivert
- Messages postés
- 6830
- Date d'inscription
- jeudi 13 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 8 juillet 2020
Bonjour,
Tu peux toujours te servir de l'enregistreur de macro pour avoir le code en vba:
d'abord tu enregistres la déprotection de la feuille ainsi que la protection
cette macro te servira à déprotéger la feuille avant de mettre ta macro qui actualise automatiquement le TCD et ensuite la protéger de nouveau.
Ensuite tu enregistres l'actualisation automatiquement du TCD.
La macro ainsi obtenu tu la mets entre la déprotection et la protection de la feuille
Ce qui donne:
Tu fais de même pour tous tes TCD
Voilà
Tu peux toujours te servir de l'enregistreur de macro pour avoir le code en vba:
d'abord tu enregistres la déprotection de la feuille ainsi que la protection
cette macro te servira à déprotéger la feuille avant de mettre ta macro qui actualise automatiquement le TCD et ensuite la protéger de nouveau.
Ensuite tu enregistres l'actualisation automatiquement du TCD.
La macro ainsi obtenu tu la mets entre la déprotection et la protection de la feuille
Ce qui donne:
Sub actualiser() 'déprotection 'actualisation TCD 'protection End Sub
Tu fais de même pour tous tes TCD
Voilà
kingsarky
Bonsoir,
La question pour moi est de mettre en place un bouton de commande permettant de faire l'actualisation en temps voulut, pour que ce soit assez simple pour les utilisateurs.
En outre dans mes recherches j'ai trouvé ceci qui fonctionne lorsqu'on lance la macro, mais je veux l'associer à un bouton de commande :
Sub RefreshAll()
''ActualisationTCD office 2013
Dim xpt As PivotTable
With ActiveSheet
.Protect usetintetfaceonly :=Trie
For Each xpt In .PivotTable
xpt. RefreshTable
N'est xpt
End with
End sub
Peux tu m'aider dans ce sens ?
Merci d'avance !
La question pour moi est de mettre en place un bouton de commande permettant de faire l'actualisation en temps voulut, pour que ce soit assez simple pour les utilisateurs.
En outre dans mes recherches j'ai trouvé ceci qui fonctionne lorsqu'on lance la macro, mais je veux l'associer à un bouton de commande :
Sub RefreshAll()
''ActualisationTCD office 2013
Dim xpt As PivotTable
With ActiveSheet
.Protect usetintetfaceonly :=Trie
For Each xpt In .PivotTable
xpt. RefreshTable
N'est xpt
End with
End sub
Peux tu m'aider dans ce sens ?
Merci d'avance !
kingsarky
Re bonsoir,
L'autre chose est que je suis novice en VBA, donc je ne sais pas comment vas enregistrer une macro......!!!
Et même le code que je t'ai envoyé ne fonctionne que lorsque les feuilles ne sont pas protégées.
L'autre chose est que je suis novice en VBA, donc je ne sais pas comment vas enregistrer une macro......!!!
Et même le code que je t'ai envoyé ne fonctionne que lorsque les feuilles ne sont pas protégées.
kingsarky
Merci encore pour les explications l'enregistrement de macros, je vais essayer demain matin et vous dire la suite.
Bonne nuit à vous !
Bonne nuit à vous !
kingsarky
Mille merci,
Grâce aux explications du lien je suis parvenu à affecter un bouton de contrôle à la macro permettant d'actualiser les TCD DDE mers feuilles protégées.
Question RÉSOLUE !
Grâce aux explications du lien je suis parvenu à affecter un bouton de contrôle à la macro permettant d'actualiser les TCD DDE mers feuilles protégées.
Question RÉSOLUE !