Lancer une macro lors de la fermeture d'un UserForm

Bonjour,

J'ai réussi a ôter la protection d'un feuille a l'ouverture d'un UserForm, mais je n'arrive pas a exécuter la macro qui permet de rebloquer la feuille quand je ferme l'UserForm. Voici le code que j'ai utilisé:

Private Sub UserForm_BeforeClose()
Worksheets("BaseDeDonnées").Protect "123ABC"
End Sub

Merci pour votre aide.

Cordialment.

Bonjour,

Teste ceci

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
  Worksheets("BaseDeDonnées").Protect "123ABC"
End Sub

Bonjour M12,

Merci cela fonctionne très bien.

Cldt.