VBA - faire un contrôle sur des cellules doublons et les coloriser

Salut à tous,

J'ai du mal à effectuer un dernier contrôle sur un tableau qui a été traité par plusieurs macros, parfois certaines cellules en doublons ne se colorisent pas correctement, je cherche à les reformater dans la même couleur via ce contrôle. Je joins le fichier excel ou j'explique cela en détail. Je mets aussi une capture d'écran ici si ça peut aider. J'espère que c'est faisable, le but serait d'ajouter cette fonction à toutes les autres compilées en une seule fonction, lancée via un raccourci clavier. Merci d'avance pour vos lumières.

Bonjour,

Ceci:

Sub Couleur()
    Dim DerLig As Long, i As Long
    Application.ScreenUpdating = False
    DerLig = Range("B" & Rows.Count).End(xlUp).Row
    For i = 2 To DerLig
        If Cells(i, "B").Interior.Color <> RGB(102, 102, 153) Then
            If Cells(i, "B") <> Cells(i - 1, "B") Then
                Cells(i, "C").Interior.Color = RGB(255, 255, 0)
            Else
                Cells(i, "C").Interior.Color = RGB(255, 0, 0)
            End If
        End If
    Next i
End Sub

Cdlt

Salut, un grand merci pour ta réactivité, ça fonctionne d'enfer !

Rechercher des sujets similaires à "vba controle doublons coloriser"