Echelle de couleurs VBA excel 2003

[krynn21]

Bonsoir

j'utilise excel 2003 je voulais savoir s'il est possible de remplir une cellule avec une couleur en fonction d'un résultat.

 

[Papou-net]

Re : Echelle de couleurs VBA excel 2003

Bonsoir krynn21, et bienvenue,

Voici une solution basique qui adapte la couleur de la cellule adjacente à la cellule pourcentage modifiée.

La zone d'action est limitée à I13:J27.

Cordialement.

 

[gbinforme]

Re : Echelle de couleurs VBA excel 2003

Bonsoir,

Avec cette macro tu colores tes pourcentages sur la colonne B : à toi d'adapter

Private Sub Worksheet_Change(ByVal sel As Range)
If Not Intersect(sel, [B:B]) Is Nothing Then
    Select Case sel
        Case 0 To 0.24
            sel.Interior.ColorIndex = 3
        Case 0.25 To 0.49
            sel.Interior.ColorIndex = 45
        Case 0.5 To 0.74
            sel.Interior.ColorIndex = 6
        Case 0.75 To 0.99
            sel.Interior.ColorIndex = 43
        Case 1
            sel.Interior.ColorIndex = 10
        Case Else
    End Select
End If
End Sub

 

[krynn21]

Re : Echelle de couleurs VBA excel 2003

Merci pour votre aide c'est génial j'ai testé et ça marche parfaitement.

Encore merci 🙂