XL 2010 Protection mot de passe sauf les filtres

[jerome91]

Bonjour,

Je souhaiterais mettre un mot de passe sur une feuille mais permettre l'utilisation d'un filtre.

J'utilise la fonction suivante via l'enregistreur :

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True

Le souci, je ne sais pas où il faut mettre le mot de passe dans le code.

J'avais mis à la fin : ActiveSheet.Protect ("motdepasse") , mais ensuite on ne peut plus filtrer.

Pourriez-vous m'aider ?

Merci.

Jérôme

 

[Paf]

bonjour,

essayer:

ActiveSheet.Protect "motdepasse", DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True

 

[jerome91]

Bonjour Paf,

Merci, ça fonctionne.

Jérôme