Macro excel pour comparer 2 onglets - Atoneo - Agence de création de site à Mulhouse

Dans notre série dédiée à l'optimisation / l'automatisation des taches chronophages et fastidieuses, voyons aujourd'hui comment comparer facilement deux tableaux excel

Macro excel pour comparer 2 onglets

Pour créer une macro Excel qui met en évidence les différences entre deux feuilles, vous pouvez utiliser les étapes suivantes :

Ouvrez le classeur Excel contenant les deux feuilles que vous voulez comparer.
Dans l’onglet « Affichage », cliquez sur le bouton « Macros » dans le groupe « Macros ».
Dans la boîte de dialogue « Macros », cliquez sur le bouton « Nouveau » pour créer une nouvelle macro.
Dans la boîte de dialogue « Nouvelle macro », entrez un nom pour la macro dans le champ « Nom de la macro » et cliquez sur le bouton « Créer ».
Dans la fenêtre « Microsoft Visual Basic pour Applications », entrez le code suivant en remplaçant « Feuille 1 » et « Feuille 2 » par les noms des feuilles que vous souhaitez comparer :

Sub MettreEnEvidence()

Dim feuille1 As Worksheet
Dim feuille2 As Worksheet

Set feuille1 = ActiveWorkbook.Sheets("Feuille1")
Set feuille2 = ActiveWorkbook.Sheets("Feuille2")

For Each cell In feuille1.UsedRange
    If cell.Value <> feuille2.Cells(cell.Row, cell.Column).Value Then
        cell.Interior.Color = RGB(255, 0, 0)
    End If
Next cell

End Sub

Enregistrez la macro et fermez la fenêtre « Microsoft Visual Basic pour Applications ».
Dans l’onglet « Affichage », cliquez à nouveau sur le bouton « Macros » et sélectionnez la macro que vous venez de créer dans la liste.
Cliquez sur le bouton « Exécuter » pour exécuter la macro et mettre en évidence toutes les différences entre les deux feuille