Find value difference in two worksheets

[ipbr21054]

Morning,
I have two sets of letters / number codes & wish to be informed of the difference between the two.

Example.
The first set are on worksheet called OLD & in range A1:J30

The second are in worksheet called NEW & are also in range A1:J30

I would like on worksheet NEW for the different values to be highlighted.

Example of what should happen.
The excel code would compare values in worksheet OLD A1 with worksheet NEW A1 if the value is the same then continue to the next value BUT If the value is different then on worksheet NEW highlight cell A1 yellow then continue doing the same for the rest in the range.

Many thanks.

 

[ipbr21054]

In my head I have something like what I think it should do but never able to put it on paper.
Example.

If A1 OLD <> A1 NEW Then A1 NEW vbYellow.

 

[mumps]

Try:

Sub CompareData()
    Application.ScreenUpdating = False
    Dim ws1 As Worksheet, ws2 As Worksheet, a As Variant, i As Long, ii As Long
    Set ws1 = Sheets("OLD")
    Set ws2 = Sheets("NEW")
    With ws1.[a1].CurrentRegion
        a = .Value
        For i = LBound(a) To UBound(a) 'loops throught rows
            For ii = LBound(a, 2) To UBound(a, 2) 'loops through columns
                If a(i, ii) <> ws2.Cells(i, ii) Then
                    ws2.Cells(i, ii).Interior.ColorIndex = 3
                End If
            Next ii
        Next i
    End With
    Application.ScreenUpdating = True
End Sub