Alterner couleur suivant la valeur

Bonjour à tous

Je souhaiterais modifier la couleur des lignes en fonction de la valeur de la troisième colonne.

Tant que la valeur est identique à la cellule du dessous, alors on conserve la même couleur.

Lorsque la valeur change alors la couleur change.

J'ai trouvé des sujets similaires mais je n'arrive pas a les appliquer a mon cas

Je souhaiterais en faite, relier l'opération décrite ci dessus a un bouton.

Je précise que le tableau d'origine aura une longueur indéterminée puisqu'il se remplit grâce a un logiciel

Merci à tous ceux qui m'accorderont de leur temps

J'ai essayé de coder quelque chose

voila l'idée que j'ai, malheureusement ça ne fonctionne pas =/

des fois que ça inspirerait certain

Const COULEUR1 As Long = 36   'jaune
Const COULEUR2 As Long = 15   'gris

For i = 2 To i = 2000
j = i + 1
If Cells(i, 3).Value = Cells(j, 3).Value Then
Rows(j).Interior.ColorIndex = COULEUR1
Else
Rows(j).Interior.ColorIndex = COULEUR2
End If
Next i

encore merci à ceux qui m'aideront

Bonjour,

A tester et à adapter.

Cdlt.

Public Sub Couleurs()
Dim ws As Worksheet
Dim lastRow As Long, i As Long
Dim lastCol As Integer
Dim rng As Range

    Application.ScreenUpdating = False

    Set ws = Worksheets("Feuil1")

    With ws
        lastRow = .Cells(Rows.Count, 1).End(xlUp).Row
        lastCol = .Cells(1, Columns.Count).End(xlToLeft).Column
        Set rng = .Range("A1").Offset(1, 0).Resize(lastRow, lastCol)
        rng.Interior.Pattern = xlPatternNone

        For i = 2 To lastRow - 1
            If .Cells(i + 1, 3) <> .Cells(i, 3) Then
                .Range(.Cells(i + 1, 1), .Cells(i + 1, lastCol)).Interior.ColorIndex = 3
            End If
        Next i
    End With

    Set ws = Nothing

End Sub

Bonjour jean-Eric

Déja merci de ta réponse

J'ai essayé ton code et ça donne pas le résultat voulu

ton code change la couleur de la ligne dès qu'il y a un changement

moi je souhaiterais conservé la même couleur pour chaque critère identique. Et que la couleur s'alterne pour pouvoir différencier facilement les groupe de critère

Je sais pas si je suis clair, du coup je te colore le résultat que je souhaiterais avoir sur le fichier ci joint

Salut Padbol,

Un fichier qui pourrait te convenir, à toi de l'adapter.

Amicalement

Pierrot

Bonjour,

A tester.

Jje pense que le code peut-être optimisé.

Cdlt.

Bonjour,

Merci à tous de vos réponses, je vais essayer cela =)