Modification formule VBA pour verrouillage cellule

Question

Private Sub Worksheet_Change(ByVal Target As Range)

ActiveSheet.Unprotect Password:="Vacoch"

Target.Locked = True

ActiveSheet.Protect Password:="Vacoch"

End Sub

Bonjour, je poste ceci afin de savoir si quelqu'un saurais me modifier ce code qui bloque les cellules dès que celles-ci sont remplies.

Moi j'aurais bien aimé que les cellules se bloquent uniquement lors de l'enregistrement ou fermeture du fichier.

Bien à vous

Sharney · Answer

La solution à ta question se trouve ici . Si j'ai bien compris, il faut utiliser les évènements BeforeClose et AfterSave En gros, écrit deux fois ton code total et remplace une fois le Worksheet_Change par Workbook_BeforeClose et une deuxième par Workbook_AfterSave Cordialement...