Залить ячейки цветом

[elena1704]

Уважаемые форумчане, доброго времени суток!
Подскажите, пожалуйста, как сделать так чтоб автоматически цвет ячеек А1-D1 становился зеленым при значении в ячейке E1 больше 0

[Sciv]

Сделать макрос, что-нибудь вида:

If Range("C1:C1").Value < 0 Then
    Range("A1:B1").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 5287936
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
End If

[elena1704]

Сообщение от Sciv

Сделать макрос, что-нибудь вида:

If Range("C1:C1").Value < 0 Then
    Range("A1:B1").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 5287936
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
End If

Спасибо большое! Можно подробнее. Я из тех кто только слышал о том, что макросы существуют, но еще ни разу не пользовался

[Aleksandr H.]

Почитайте об условном форматировании. 5 нажатий кнопки и все работает

[elena1704]

Сообщение от Aleksandr H.

Почитайте об условном форматировании. 5 нажатий кнопки и все работает

Огромное спасибо! Ваш совет гениален!