Code pour mot de passe

Bonjour à tous,

A peine un 1er problème résolu, je viens avec un autre sur le même dossier

Je protège mes feuille par un mot de passe feuil1 :Mot de passe "Z1" et ainsi de suite jusqu’à "Z5"

Mon code à l'ouverture de la feuille

Sheets("Zone1").Select
   ActiveSheet.Unprotect
   Password :"Z1"  ' cette ligne de code ne fonctionne pas

Merci de votre aide, mon fichier touche à sa fin

Amitiés à tous

Pierrot

Bonjour Cappe Pierre

ActiveSheet.Unprotect ("Z1") 

Bonjour

Essaie ce code :

ActiveSheet.Unprotect Password:="Z1"

Bye !

Bonjour, Force rouge, gmb

merci de vos réponses, ça fonctionne bien tous les deux, mais ça me crée des problèmes au cours de mes macros qui ouvrent et ferment

ces formulaires.

Je vais les protéger sans mot de passe, il y aura un mot de passe uniquement sur l'ouverture du Classeur

Merci beaucoup de votre aide et bonne journée à vous deux.

Amitiés

Pierrot

Bonsoir à tous,

j'ai résolu mes problèmes

encore merci à vous

Amicalement

Pierrot