Conserver l'alternance des couleurs des lignes d'une colonne après tri

[Magic_Doctor]

Bonjour à tous,

J'ai une liste dans une colonne.
Pour des raisons à la fois esthétiques et de clarté, les couleurs des lignes de la colonne s'alternent, par exemple :
BLANC-GRIS-BLANC-GRIS-BLANC-GRIS...

Si je fais un tri sur cette colonne, il n'y aura plus du tout d'alternance et le résultat visuel pourra très bien être :
GRIS-GRIS-BLANC-GRIS-BLANC-BLANC-BLANC-GRIS...
Comment y remédier ?

Merci d'avance pour toute suggestion.

 

[JCGL]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour à tous,

En utilisant la formule :

=MOD(LIGNE();2)=0

dans une MeFC

A + à tous

Edition : je n'avais vu le "après un tri" :

=MOD(SOUS.TOTAL(3;A$1:A1);2)

 

[job75]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour Magic Doctor, JC 🙂

La colonne A étant sélectionnée (et A1 étant la cellule active), formule de la MFC :

=ET($A1<>"";MOD(LIGNE();2))

Tri ou pas tri, il y aura toujours ainsi alternance des couleurs...

Edit : si l'on ne veut pas modifier la couleur de la ligne 1 (titres) alors :

=ET($A1<>"";MOD(LIGNE();2);LIGNE()>1)

ou mieux :

=ET($A1<>"";NON(MOD(LIGNE();2)))

A+

 

[Magic_Doctor]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour JCGL.

Merci pour ta réponse, mais comment s'y prendrait-on au travers d'une macro ?

 

[JCGL]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour à tous,
Salut Job 🙂

Pas tout à fait d'accord mon cher Job...
Pour le tri... Surement. Et il était bien question de tri dans la demande
Peux-tu tester le fichier joint en appliquant les filtres ?

A++ l'ami
A + à tous

 

[job75]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Re,

mais comment s'y prendrait-on au travers d'une macro ?

Ben moi j'ai Excel 2010 avec un Enregistreur qui m'a donné :

Sub Macro1()
    Columns("A:A").Select
    Cells.FormatConditions.Delete
    Columns("A:A").Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=ET($A1<>"""";MOD(LIGNE();2))"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = -0.349986266670736
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub

Mais ceci paraît nettement plus propre :

Sub Macro2()
[A:A].FormatConditions.Delete
[A:A].FormatConditions.Add xlExpression, Formula1:= _
  "=ET($A1<>"""";MOD(LIGNE();2))"
[A:A].FormatConditions(1).Interior.ColorIndex = 15 'gris
End Sub

Edit : tu as raison JC, je ne pensais pas au filtrage 🙂

A+

 

[Magic_Doctor]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour job

Vos solutions fonctionnent.
Merci à tous les deux.
Bonne journée

 

[Misange]

Re : Conserver l'alternance des couleurs des lignes d'une colonne après tri

Bonjour
Puisque tu as excel 2007, sélectionne ta liste. Onglet accueil/Mettre sous forme de tableau.
Tu as le choix dans la présentation et surtout quand tu tries ton alternance de bandes reste sans avoir rien à faire. C'est un des très nombreux avantages des tables au sens 2007-2010.
plus dinfos ici sur ces autres avantages
Ce lien n'existe plus