Colorier lignes d'un tableau selon plus de 3 critères ?

[Patrick]

Bonjour,
Pouvez-vous conseiller un débutant complet et un peu neuneu ???
Je me heurte à un problème de colorisation automatiques de lignes dans un tableau.

J'ai un tableau de 300 lignes, 20 colonnes.

Je souhaite que chaque ligne se colorie automatiquement selon la valeur apparaissant en colonne A de chaque ligne.

Si A1 = 1 --> toute la ligne 1 passe en bleu,
Si A2 = 4 --> toute la ligne 2 passe en rouge,
etc...

Solution toute simple : la mise en forme conditionnelle bien sur

Sauf que dans mon cas je peux avoir 6 valeurs différentes, et donc je suis coincé car seuls trois critères simultanés sont gérés par la mis en forme conditionnelle.


En cherchant j'ai mis la main sur un bout de code utilisant la fonction "select case".
Extrait :
Select Case toto
Case 1
With Selection.Interior
.ColorIndex = 7
.Pattern = xlSolid
End With
Case 2
etc...


Ca semble tout à fait ce dont j'ai besoin : je pourrai appliquer autant de "Case" que necessaire.

Mais hélas mon niveau de débutant complet en macro fait que j'ai beaucoup de mal à transposer ce code dans mon contexte, notamment tout ce qui concerne la "portée" de ce qui est colorié, et l'automatisation.

en gros, je n'ai pas réussi à :
- faire s'appliquer la colorisation non pas sur une cellule mais sur une ligne entière,
- rendre la colorisation de chaque ligne indépendante des autres lignes,
- rendre la colorisation dynamique (ne pas avoir à faire "Executer macro").


Est-ce que vous auriez la patience de me donner quelques conseils ?

Merci beaucoup

Patrick.

 

[CBernardT]

Bonsoir Patrick

Effectivement select case est une bonne solution !

La macro est placée dans le module de la feuille "Sélection".

J'ai rajouté la palette des couleurs afin que tu puisses réaliser un arc en ciel hi hi

Cordialement

CBernardT

 

[Patrick]

Merci beaucoup pour le fichier Bernard

Ca marche royal, c'est super !!!!

Je vais intégrer ça tout à l'heure au bureau, et j'espère parvenir à l'adapter pour coloriser uniquement les colonnes utiles de mon tableau et non l'intégralité des lignes.

Merci aussi pour la palette de couleur, c'est également un bon gain de temps que tu m'as fais là

 

[chris1]

Bonsoir
A force de chercher, j'ai enfin trouvé ce que je voulais (ou presque).
En effet, en fonction d'une valeur, je voudrais colorier une ligne.
J'ai pu adapter le fichier de CBernardT (en fonction d'un texte et non d'un chiffre) mais comme tu le dis en fin de message, tu espères parvenir à adapter celui-ci pour ne colorier que les colonnes utiles et non pas toute la ligne.
Y es tu arrivé ? Moi pas.
Sinon si quelqu'un a une idée.
Merci

 

[CBernardT]

Bonsoir Patrick et Chris1

Pour ne colorer que les colonnes utiles et non pas toute la ligne il faut ajouter la plage de la ligne à colorer.


Cordialement

CBernardT

 

[chris1]

Bonjour CBernardT et merci pour ton aide.
Ca marche impeccable.

J'en profite pour te solliciter à nouveau. En effet ce matin, j'ai posé un nouvelle question qui a pour titre Extraire les lignes de Feuil1 vers Feuil2.
Pour l'instant, je n'ai pas eu de réponse.
Aurais-tu une piste ?
Encore merci