Macro pour rendre les modifications visibles dans une feuille de calcul, Excel VBA

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

 

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x
()
x