Protection des feuilles

[manu]

Bonjour à tous,

Voilà mon problème :

J'ai crée une macro qui fonctionnait très bien (alerte1), et dont le but est de faire clignoter des cellules lorsque celles ci ne remplissent pas une condition.

Mais lorsque je protege ma feuille (outil > proteger la feuille), et ceux sans mot de passe, la macro beug (à la ligne:Cells(9, 10).Interior.ColorIndex = 3)
J'ai essayé également en otant le verrouillage des cellules impliquées dans la macro, mais rien y fait.

Ensuite, pour essayer de résoudre mon problème, j'ai écris dans thisworkbook :

Private Sub Workbook_Activate()
Worksheets("Feuil1").Protect UserInterfaceOnly = False
End Sub

Depuis, la protection de la feuille se met automatiquement au démarrage,
la macro beug toujours à la même ligne.

De plus, je n'arrive plus à ôter la protection de la feuille, il me demande un mot de passe que je ne connais pas (car je n'en n'ai jamais mis).

J'efface alors ce que j'ai écris dans thisworkbook, je ferme, et lorsque je réouvre le fichier, il se remet automatiquement en protection au démarrage, me demande toujours un mot de passe que je n'ai pas, alors que le morceaux de code écrit dans thisworkbook n'existe plus !!

Je ne comprends plus rien. Mon fichier est en pièce jointe.

Merci infiniment de votre aide.
Manu.

 

[Pascal76]

Bon Manu

En effet il faut déprotéger à première vue

Je t'ai fais juste la modif pour la protection.

Bon courage

Pascal

 

[manu]

Merci à ceux qui m'ont répondu et aidé.

La modif a débloqué la feuille, mais en plus je peux verouiller ma feuille tout en ayant ma macro qui fonctionne. Le top, c'est ce que je voulais.
@+