Erreur lors de la protection

Bonjour à tous,

Je sollicite votre aide afin de trouver une solution au problème suivant:

Lors de la protection de ma feuille de calcul, je me trouve face à l'erreur ci dessous et ne parviens pas à comprendre l'origine de mon erreur et a y apporter la solution:

Cette erreur survient lorsque je protège la feuille et au cotrario cela fonctionne très bien en mode non-protégé.

Je mets en pièce-jointe un exemple du fichier et vous remercie d'ores et déjà de toute aide que vous pourrez me faire parvenir.

Une excellente fin de journée à tous.

Bonjour, dans votre code remplacez les :

 With Target
        .Value = Now
        .NumberFormat = "hh:mm:ss"
    End With

par

   With Target
        .Value = Format(Now, "hh:mm:ss")
      End With

( Le format d'une cellule n'est pas modifiable quand la protection est activée, il faut donc insérer le nombre directement avec le bon format )

Bonjour Xmenpl,

Je vous remercie de votre aide en effet après avoir procédé à cette modification cela fonctionne parfaitement.

Je vous reitère tous mes remerciment ainsi qu' à tous ceux qui ont suivi le sujet et vous souhaite d'ores et déjà à

une excellente fin de journée à tous.