Mise en forme conditionnelle

Bonjour,

Dans le tableau en PJ, en colonne L, je souhaite que les cellules soient coloriées suivants la légende indiquée en D1:G3, çàd :

- si la valeur est comprise entre -99 et + 99 : vert clair

- si la valeur est comprise entre (-100;-500) et (+100;+500) : jaune clair

- si la valeur est comprise entre -501 et + 501 : rouge

j'ai l'impression que ce n'est pas possible

Bonjour

j'ai l'impression que ce n'est pas possible

En effet car la dernière plage, [-501 +501] , recouvre les autres...

Bye !

Bonjour,

A tester

Bonjour, une autre proposition :

Option Explicit

Sub Couleur_L()
    Dim i As Long, nL As Long, celVal As Single
    Dim couleur(3) As Long, wS As Worksheet, index As Byte

    Set wS = Sheets("Données")
    couleur(1) = RGB(226, 239, 218)
    couleur(2) = RGB(255, 242, 204)
    couleur(3) = RGB(255, 124, 128)

    nL = wS.Cells(Rows.Count, "L").End(xlUp).Row
    For i = 3 To nL
        If IsNumeric(wS.Cells(i, 12)) Then
            celVal = wS.Cells(i, 12).Value
            Select Case celVal
                Case Is < 100: index = 1
                Case Is > 500: index = 3
                Case Else: index = 2
            End Select
            wS.Cells(i, 12).Interior.Color = couleur(index)
        End If
    Next i
End Sub