Autoriser une macro sur une feuille protegée

Résolu
zer4 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention   -  
Patrice33740 Messages postés 8561 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 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
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