как покрасить ячейку, если значение в ней отличается от ячейки выше?

Question

У меня есть ряд ячеек, и я хочу, чтобы вся строка была окрашена, если ячейка определенного столбца имеет значение, отличное от ячейки над ней. например

      +
a b c d e
x y z d k
b d s d 2
a a a a f    < color this whole row >
g j k a q
p o i b d    < color this whole row >
      +

В приведенном выше примере соответствующий столбец отмечен знаком «+».

Answer 1

Вы можете использовать условное форматирование или попробовать этот короткий макрос VBA:

Sub ColorMeRed()
    Dim i As Long, N As Long

    N = Cells(Rows.Count, 1).End(xlUp).Row
    For i = 2 To N
        If Cells(i - 1, 4).Value <> Cells(i, 4).Value Then
            Range(Cells(i, 1), Cells(i, 5)).Interior.Color = vbRed
        End If
    Next i

End Sub

До:

и после: