Cellules protegée automatiquement

Bonjour

J'ai un fichier Excel qui sert au calcul du temps supplémentaire.

Un employé entre sur une ligne des informations sur les heures travaillées (Date, heure, etc.)

Le fichier calcule les heures supplémentaires.

Lorsque j'ai validé l'exactitude des données, je souhaite cliquer dans une cellule de la colonne VALIDATION, activer une macro avec CTRL-V. Cette macro, inscrit VALIDÉdans la cellule et protège les données pour que l'employé ne puisse plus faire de modification.

Lorsque je fais CTRL-V dans la cellule (H-3), la macro fonctionne. Lorsque j'essaie de le refaire pour la deuxième ligne (H-4), j'ai une erreur numéro 1004. Je ne comprends pas pourquoi.

Pouvez-vous m'aider ?

Merci

Bonjour

Où est passé le code de ta macro?

Cordialement

Bonjour,

Le voici

Salut le forum

Medic911, une version vite fait à main levée.

Sub Valider()
With ActiveCell
  If .Locked Then Exit Sub
    If .Column = 8 Then
        .Value = "Validé"
        ActiveSheet.Unprotect
        Range(Cells(.Row, 1), Cells(.Row, 6)).Locked = True
        Cells(.Row, 8).Locked = True
        ActiveSheet.Protect
    End If
End With
End Sub

Mytå

Merci ça fonctionne très bien