Si vous avez apporté quelques modifications à une feuille de calcul, il peut être difficile, selon la taille du tableau, de revérifier après les modifications apportées. Quelles cellules ont maintenant été modifiées? Pour ce faire, utilisez l’événement Worksheet_Change pour afficher toutes les modifications depuis le dernier enregistrement du classeur. Toutes les cellules modifiées reçoivent la couleur d’arrière-plan gris.
La programmation de l’événement est présentée dans la macro suivante:
Private Sub Worksheet_Change _
(ByVal Cible As Excel.Range)
If Intersect( Cible, Range("B2:C13")) Is Nothing _
Then Exit Sub
Cible.Interior.ColorIndex = 15
End Sub
Utilisez la méthode Intersection pour vérifier si la cellule modifiée se trouve dans la zone cible définie B2: C13. Si tel est le cas, coloriez la cellule avec la propriété ColorIndex, à laquelle vous affectez l’index 15 (gris).
Il est conseillé de normaliser cette mise en forme des cellules modifiées avant d’enregistrer le classeur. Pour ce faire, vous utilisez l’événement de classeur Workbook_BeforeSave.
Private Sub Workbook_BeforeSave _
(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("constante").Range("B2:C13"). _
Interior.ColorIndex = xlNone
End Sub