Protéger une feuille par VBA avec un mot de passe

Comment protéger par macro les objets de la feuille 1 en entrant un mot de passe ?

Essaie ceci : Le mot de passe est "toto" et cela va protéger seulement les objets situés dans la feuille "Feuil1"
Worksheets("Feuil1").Protect Password="toto", DrawingObjects:=True
Attention, si tu ne veux pas protéger les cellules, tu ne peux pas utiliser : userinterfaceOnly:=True, regarde la définition qu'en donne l'aide : UserInterfaceOnly Argument de type Variant facultatif. Cet argument a la valeur True pour protéger l'interface utilisateur, mais pas les macros. Si cet argument n'est pas spécifié, la protection s'applique à la fois aux macros et à l'interface utilisateur.

Auteur :

Mots clefs associés à cette page : , , , , ,

mot de passe

merci c'est impicable

mot de passe

Bonjour,

J'ai moi aussi besoin de mettre en place une protection sur une feuille, il se trouve que la solution proposée ici ne fonctionne pas sur mon poste. La macro bug à "Protect Password" !

Si quelqu'un a la solution, je suis preneur !

ninos

protect password

Bonjour,
Il suffit de mettre : apres password ça donne ça:
Worksheets("Feuil1").Protect Password:="toto", DrawingObjects:=True
et là ça devrait mieux marcher c'est peut-être en fonction de la version d'office
voilou