Code VBA:protection uniquement les cellules déverrouillées

rebonjour,

pour faire suite à mon précédent message, dans mon code, je désire à la fin protéger la feuille en ne pouvant aller que sur les les cellules déverrouillées. Voici l'extrait du code sensé le faire et pourtant cela ne fonctionne pas. Ou est mon erreur?

Sheets("saisie").Select:

Selection.ClearContents: je mets à vide ma grille de saisie

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

ActiveSheet.EnableSelection = xlUnlockedCells: je protège la feuille en ne pouvant modifier que les cellules non verrouillées

Sheets("saisie").Protect Password:="elfi": je donne un mot de passe à ma protection

D'avance merci

Elfi

OK, ne vous embêtez plus. J'ai fait autrement. J'ai déplacé cette partie de code dans la macro qui me permets d'accèder à la saisie.

Maintenant, cela fonctionne.

Merci quand même à tous,

Elfi

bonjour à tous,

re,

à mon avis, tu n'a pas besoin de dé-protéger dans la macro,

les cellules de saisie c7:c51 étant déverrouillées

Claude.

Merci, Claude, nos messages se sont croisés. Je prend en compte aussi ton info.

Bien cordialement,

Elfi