Macro pour actualiser tous les TCD d'un classeur

Résolu/Fermé
cs_pajude Messages postés 8 Date d'inscription vendredi 14 novembre 2008 Statut Membre Dernière intervention 25 juin 2019 - 1 mars 2015 à 18:00
cs_pajude Messages postés 8 Date d'inscription vendredi 14 novembre 2008 Statut Membre Dernière intervention 25 juin 2019 - 1 mars 2015 à 19:42
Bonjour à tous,
J'ai un classeur Excel 2007 qui a 4 TCD sur 4 feuilles différentes. Je voudrais que les TCD se mettent à jour automatiquement dès que j'affiche la feuille.
J'ai bien trouvé une macro sur le net qui fonctionne, mais il faut la mettre dans chaque feuille :
Private Sub Worksheet_Activate()
ThisWorkbook.RefreshAll
End Sub

Est ce que vous pouvez corriger cette macro pour n'en avoir qu'une dans le classeur.
Merci

1 réponse

eriiic Messages postés 24569 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 28 décembre 2023 7 207
1 mars 2015 à 19:13
Bonjour,

dans ThisWorkbook :
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    ThisWorkbook.RefreshAll
End Sub

eric
2
cs_pajude Messages postés 8 Date d'inscription vendredi 14 novembre 2008 Statut Membre Dernière intervention 25 juin 2019
1 mars 2015 à 19:42
Bonjour,
C'est exactement ce que je voulais.
Merci beaucoup,
Bonne continuation.
Pajude
0