"protect" déprotège ?

Bonjour

Au secours. J'ai un problème:

Je remarque que la commande "activeworkbook.protect" déprotège quand le fichier est protégé.

Code:

---

1 2 3

Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveWorkbook.Protect ("pasw") End Sub

---

Quelqu'un peut-il m'aider?
Merci d'avance !