colorer une cellule en fonction de sa valeur

Question

Bonjour,  

Je cherche à utiliser une macro pour pouvoir colorer le fond d'une cellule en fonction de la valeur qu'elle contient. 

Par exemple j'ai 3 colonnes qui reçoivent une valeur (par programmation en php) et je voudrais que la première colonne se colore en rouge si sa valeur est supérieure à 200, la deuxième se colore en orange si la valeur est comprise entre 100 et 200 et la troisième en vert si la valeur est inférieure à 100. 


Je pensais utiliser une macro mais je ne sais pas vraiment comment ça fonctionne finalement, pourriez-vous m'éclairer un peu svp ? 
Ou peut être y a t-il une solution ? 


Merci beaucoup de vos futures réponses 


PS : je travaille avec Open Office sur un fichier .odt

Utilisateur anonyme · Answer

Bonjour,

À placer derrière la feuille ...

Private Sub Worksheet_Change(ByVal Target As Range)

    If (Target.Column = 1) Then
        If (Target.Value > 200) Then
            Target.Interior.ColorIndex = 6
        Else
            Target.Interior.ColorIndex = 0
        End If
    Else
        If (Target.Column = 2) Then
            If (Target.Value > 99 And Target.Value < 201) Then
                Target.Interior.ColorIndex = 5
            Else
                Target.Interior.ColorIndex = 0
            End If
        Else
            If (Target.Column = 3) Then
                If ((Target.Value < 100) And (Target.Value <> "")) Then
                    Target.Interior.ColorIndex = 3
                Else
                    If (Target.Value = "") Then
                        Target.Interior.ColorIndex = 0
                    End If
                End If
            End If
        End If
    End If
End Sub
'

Cdt

Lupin

Colorer une cellule en fonction de sa valeur

1 réponse

Discussions similaires

Newsletters