Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel (Dé)protéger une feuille depuis un autre classeur

(Dé)protéger une feuille depuis un autre classeur

1 réponse
Avatar
Fil GOUDE
Bonjour,

j'ai un classeur avec une macro de ce genre dans "this workbook" :

Private Sub Workbook_Open()
ThisWorkbook.Sheets(8).Unprotect password:="tartempion"
Sheets(8).Visible = xlSheetVisible
End Sub

Lorsque j'ouvre ledit classeur, pas de problème, la feuille 8 se
déprotège et devient visible.

En revanche, si j'ouvre ce même classeur par programmation depuis un
autre classeur, la fameuse feuille 8 ne ne déprotège ni ne se rend
visible.

Une idée pour que cela puisse marcher ?

Merci à tous
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Alain CROS
Bonjour.

C'est un problème d'XL97.

Dans un module standard à la place de WorkbookOpen

Sub auto_open()
With ThisWorkbook.Sheets(8)
.Unprotect password:="tartempion"
.Visible = xlSheetVisible
End With
End Sub

et dans l'autre classeur.

Sub OuvreClasseurRécalcitrant()
Workbooks.Open "Chemin complet du classeur récalcitrant"
ActiveWorkbook.RunAutoMacros xlAutoOpen
End Sub

Alain CROS

-----Message d'origine-----
Bonjour,

j'ai un classeur avec une macro de ce genre dans "this
workbook" :


Private Sub Workbook_Open()
ThisWorkbook.Sheets(8).Unprotect password:="tartempion"
Sheets(8).Visible = xlSheetVisible
End Sub

Lorsque j'ouvre ledit classeur, pas de problème, la
feuille 8 se

déprotège et devient visible.

En revanche, si j'ouvre ce même classeur par
programmation depuis un

autre classeur, la fameuse feuille 8 ne ne déprotège ni
ne se rend

visible.

Une idée pour que cela puisse marcher ?

Merci à tous
.