Private Sub Worksheet_Change(ByVal Target As Range)
' Procédure qui s'éxécute lors du changement du contenu d'une cellule
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' Procédure qui s'éxécute lors du changement de cellule (déplacement)
End Sub