Bonour à toutes et tous,
Sur un classeur ci-joint je souhaite pouvoir copier une intégration dans la feuille listing qui mets directement à jours les TCB des différents onglets protégés par un mot de passe ("mdp").
j'ai intégré à chaque feuille le code suivant :
Private Sub Worksheet_Activate()
With Me
.Unprotect "mdp"
.PivotTables("Tableau croisé dynamique1").RefreshTable
.Protect Password:="mdp"
End With
End Sub
mais qd je navigue sur mes l'onglets l'erreur suivante apparait :
"erreur d'éxécution '1004' :
impossible d'éxécuter cette commande dans une feuille protégée contenant un autre rapport de tableau croisée dnamique basé sur les mêmes données sources.
Pour ôter la protection de la feuille contenant l'autre rapport, cliquez sur l'onglet de la feuille, puis oter la protection de la feuille ........ "
pouvez vous m'aider à solutionner cette problématique ?
d'avance merci
xavier