Bonjour,
Le sujet a déjà été traité maintes fois mais je n'ai pas trouvé la solution à ce problème:
J'ai une base de données dans un onglet non protégé.
De cette base de donnée, je construis plusieurs TCD sur différentes feuilles (1 feuille par TCD)
Toutes ces feuilles à TCD doivent être protégées de l'utilisateur final.
Comment mettre à jour les TCD quand on clique sur chacune d'entre elles.
Ca marche avec une feuille à TCD protégée et le code ci dessous mais pas avec une 2e feuille à TCD protégée.
Qui pourrait me corriger ce code pour que la mise à jour du TCD de la feuille que je sélectionne se mette à jour et ce quelle que soit la feuille. J'en ai 5 avec 5 TCD provenant de ma base de données.
Merci !!!!
Private Sub Worksheet_Activate()
'Refresh_tcdDelegations Macro
ActiveSheet.Unprotect Password:="mdp"
ActiveSheet.PivotTables("tcdDelegations").PivotCache.Refresh
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:= _
False, AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:= _
True
With Sheets("DELEGATIONS")
.EnablePivotTable = True
.Protect "mdp", userinterfaceonly:=True
End With
End Sub