Find Mismatched Cell Values

[RedMug]

I am trying to identify cells within a row that have a different value from the second cell in the row. (The first cell in the row represents the identifier) All the cells within the row should either have a blank (if there was no value linked to the identifier) or a set of RGB values separated by commas. I have tried a variety of MATCH, EXACT, Special - duplicate rows, type formulas but either the commas within the cells or the blanks are messing with the formulas. As an example in row 2, E2 and F2 are different from B2, so ideally I would like these cells to be highlighted to point out the difference. Thank you in advance to whoever can help.
Please let me know if I need to clarify more.

Identifier	B	C	D	E	F	G
Cat	214,12,0	214,12,0	214,12,0	213,11,0	213,11,0	214,12,0
Dog	148,40,68	148,40,68	148,40,68	148,40,68	148,40,68	148,40,68
Mouse	173,79,137	173,79,137	173,79,137	173,79,137	173,79,137	173,79,137

<tbody>
</tbody>

 

[NeonRedSharpie]

Just use some conditional formatting! Or, if you want a macro because I love macros....

Sub colorize()

    Dim colStart As Integer
    Dim colEnd As Long
    
    Dim rowStart As Integer
    Dim rowEnd As Long
    
    colStart = 3
    colEnd = Cells(1, Columns.Count).End(xlToLeft).Column
    
    rowStart = 2
    rowEnd = Cells(Rows.Count, "A").End(xlUp).Row
    
    For x = rowStart To rowEnd
        For y = colStart To colEnd
        
            If Cells(x, y) <> Cells(x, 2) Then Cells(x, y).Interior.Color = vbRed
        
        Next y
    Next x
End Sub

 

[JoeMo]

Select all the cells from C2 to G whatever (in your posted data whatever would be 4, so C2:G4).
On the Data menu choose Conditional Formatting>New Rule>Use Formula.
In the formula box enter: =C2<>$B2
Set the format to fill unmatched cells with your desired color.
Click OK.

 

[RedMug]

Just use some conditional formatting! Or, if you want a macro because I love macros....

Sub colorize()

    Dim colStart As Integer
    Dim colEnd As Long
    
    Dim rowStart As Integer
    Dim rowEnd As Long
    
    colStart = 3
    colEnd = Cells(1, Columns.Count).End(xlToLeft).Column
    
    rowStart = 2
    rowEnd = Cells(Rows.Count, "A").End(xlUp).Row
    
    For x = rowStart To rowEnd
        For y = colStart To colEnd
        
            If Cells(x, y) <> Cells(x, 2) Then Cells(x, y).Interior.Color = vbRed
        
        Next y
    Next x
End Sub

Thank you for this! I knew it had to be something simple like formatting but I couldn't get the right formula to do what I wanted. I also love macros, but I am new to them and the conditional formatting did the trick.

 

[RedMug]

Thank you JoeMo, this is what I was looking for!

 

[RedMug]

Also thank you NeonRedSharpie for the super quick reply!

 

[JoeMo]

Thank you JoeMo, this is what I was looking for!

You are welcome - thanks for the reply.