Bonjour Mytick, le fil, le forum,
If Worksheets("Inventaire").Range(MaCellule).Locked = True Then
Réponse = MsgBox("Suppression de cette ligne non autorisée !", vbOKOnly, "Contrôle de suppression")
Exit Sub
End If
Ce que je ne pas encore compris, c'est où ou il y a un verrouillage ou déverrouillage.
Je ne trouve seulement que les vérifications.
Je suis retourné sur de vieille version et je ne trouve pas non plus.
Bastr