alternance couleur conservée apres tri

  • Initiateur de la discussion rice
  • Date de début
R

rice

Guest
Bonjour à tous
J'ai une feuille excel avec une liste de noms, pour une meilleure lisibilité je souhaite avoir une alternance de couleurs gris blanc pour les lignes. Je souhaite pouvoir entrer de nouveaux noms, trier au fur et à mesure mais en conservant l'alternance des couleurs
Merci d'avance à celles et ceux qui voudront bien me faire une proposition
Je mets un fichier en piece jointe mais il n'y a pas grand chose pour l'instant
 

Tibo

XLDnaute Barbatruc
Bonjour Rice,

Sélectionne ton tableau, puis attribue la Mise en Forme Conditionnelle suivante :

Menu Format / Mise en Forme Conditionnelle /

la formule esst :

=MOD(LIGNE();2) + Format gris

Ca te met une ligne sur 2 en gris peu importe que tu tries, que tu insères ou que tu supprimes des lignes.

@+
 

andré

XLDnaute Barbatruc
Salut,

Pour l'alternance de couleurs il faut appliquer une MFC (mise en forme conditionnelle sous le menu Fortmat) sur la plage concernée, avec 'la foomule est' :
=MOD(LIGNE();2)=0
puis sous le bouton Format, l'onglet Motif et choisir la couleur grise / OK / OK.

Â+

EDITION :
Oups, salut Tibo.
C'est la deuxième fois aujourd'hui !

Message édité par: andré, à: 22/03/2006 16:45
 
R

rice

Guest
Merci de votre reponse hyper rapide à tous les deux, est ce que je peux definir le nombre de lignes concernées au fur et à mesure que ce nombre augmente?
Au départ je vais avoir 5 grises, 5 blanches mais au fur et à mesure j'en aurai beaucoup plus
Comment faire pour que la mise en forme conditionnelle porte sur le bon nombre de lignes?
Merci
 

Tibo

XLDnaute Barbatruc
Re,

et salut à tout le fil,

Autre solution qui consiste à tester si la colonne A est vide ou non

Dans l'hypothèse où les données seraient saisies à partir de A1, ça pourrait donner la MFC suivante :

=ET(NON(ESTVIDE($A1));MOD(LIGNE();2))

@+
 

jeromegmc

XLDnaute Occasionnel
Salut,

La solution proposé par nos amis du forum est très sympa, perso ne connaissant pas cette manip je me suis fait un bouton perso pour réaliser un remplissage alterné:

Code:
Sub Remplissage_alterné()  'remplissage alterné jaune/vert des lignes sélectionnées

Dim MyCells As Range, MyRow, Cellule As Variant, Début As Date, Fin As Date, _
Madurée As Date

Début = Now
Set MyCells = Selection
'Set mycells = Application.InputBox(prompt:='Sélectionnez la plage de cellules.', _
'Title:='Plage de cellules', Left:=500, Top:=300, Type:=8)

MyCells.Interior.ColorIndex = 36 'couleur de remplissage jaune
 
MyCells.Select

'remplissage alterné
For Each Cellule In MyCells
MyRow = Cellule.Row Mod 2 'test de la parité, on obtient 0 quand le n° de ligne
'est paire
If MyRow = 0 Then  'si le n° de ligne est paire
Cellule.Interior.ColorIndex = 35 'couleur de remplissage vert
End If
Next

End Sub


A+

PS: le code couleur en VBA pour blanc est 2 et pour gris c'est 15.
 
R

rice

Guest
J'ai testé cette mise en forme conditionnelle qui marche au poil, mais j'aimerais si c'est possible que la mise en forme porte sur la plage de données saisie au fur et à mesure si cela est possible
Merci
 
R

rice

Guest
Merci Jerome et Tibo pour ces autres solutions également tres interessantes
Il faut que je prenne un peu de temps pour voir ce qui correspondra le mieux à mon fichier qui a d'autres impératifs par ailleurs
Merci encore
 
A

AV

Guest
Pour formater, une ligne sur deux, une plage susceptible d'être filtrée…
Exemple avec A2:A20 (étiquette servant de nom de champ en A1)
Sélection A2:A20 >> Format >> Mise en forme conditionnelle >> La formule est :
=MOD(SOMME(SOUS.TOTAL(3;DECALER($A$2;LIGNE($A$2:$A2)-LIGNE($A$2);;)));2)
>> Format….. OK
Pour tester il suffit d'appliquer un filtre sur la colonne A

AV [MVP Excel]
 

Celeda

XLDnaute Barbatruc
Bonsoir,

Sorry pour l'intrusion mais :eek:hmy: Surprise !!

AV ===>>> l'illustre Alain Vallon du MPFE qui nous rend une petite visite ???

oh oh on sort le champagne !!!pour souligner cette joie.

Merci c'est tout gentil tout plein et c'est un honneur monsieur de vous recevoir encore parmi nous.

J'ai pas pu dérouler le tapis rouge, il est au pressing, mais le coeur y est et au nom d'XLD,
je vous fais une révérence de bienvenue.

et on se fait une bouffe quand ?? Monsieur Vallon ?

Celeda ;)
 

Statistiques des forums

Discussions
312 219
Messages
2 086 372
Membres
103 198
dernier inscrit
CACCIATORE