Autoriser une macro sur une feuille protegée

Résolu/Fermé
zer4 Messages postés 53 Date d'inscription lundi 31 octobre 2011 Statut Membre Dernière intervention 12 décembre 2017 - 17 janv. 2017 à 16:03
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 17 janv. 2017 à 16:16
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.

A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
17 janv. 2017 à 16:16
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