[VBA] Comparing two columns and pasting the difference into a third column

Sub Find_Matches()
    
    Set CompareRange = Range("B1:B5")

    For Each x In Selection
        For Each y In CompareRange
            If x = y Then x.Offset(0, 2) = x
        Next y
    Next x
End Sub

That's what I have compiled so far. But instead of if X = Y. I want it so if X doesn't equal to Y, it would paste into the 3rd column. Just that if I do <> it doesn't work.