Salut Yann,
Au début de ta procédure, tu ajoutes:
Activesheet.Unprotect password:="TonMotDePasse"
( si tu n'as pas de mot de passe, activesheet.unprotect suffit)
A la fin de ta procédure, tu rajoutes le contraire:
Activesheet.Protect password:="TonMotDePasse", _
DrawingObjects:=True, _
Contents:=True, _
Scenarios:=True
Rq: ceci est valable avec excel 2000. Avec excel XP, je crois que tu peux avoir de nouveaux arguments à la fonction Protect (voir dans ce cas l'aide de VBA).
A plus.