Autoriser une macro sur une feuille protegée

Résolu
zer4 Messages postés 56 Statut Membre -  
Patrice33740 Messages postés 8931 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je cherche une solution en VBA ou non pour utiliser ma macro sur feuille protégée.
j'ai utilisé ce code :

Sub MacroavecfeuilleProtect()
ActiveSheet.Unprotect "lemotdepasse"

'Placez ici vos instructions

ActiveSheet.Protect "lemotdepasse", True, True, True
End Sub

mais le problème est que si j'ôte la protection, des que j'active ma macro cela re protège directement la feuille (alors que je l'avais ôtée au par avant )

Cordialement.

1 réponse

Patrice33740 Messages postés 8931 Date d'inscription   Statut Membre Dernière intervention   1 782
 
Bonjour,

Avec :
Sub MacroavecfeuilleProtect()
Dim protégé As Boolean
  
  protégé = ActiveSheet.ProtectContents
  If protégé Then ActiveSheet.Unprotect "lemotdepasse"

  'Placez ici vos instructions

  If protégé Then ActiveSheet.Protect "lemotdepasse", True, True, True

End Sub


0