salut,
tu as juste a préciser le mot de passe derrière:
ActiveSheet.Unprotect "monmotdepasse"
et après pour reprotégé c pareil mais la il y a pas mal d'option a mettre ou non quand tu protège. voici un ex:
ActiveSheet.Protect "monmotdepasse", DrawingObjects:=True, Contents:=True, Scenarios:=True