Discussion :

[soipx]

Bonjour,

Je vous expose mon problème. J'ai une suite de chiffres en ligne avec en dernière case toute à droite une case avec le max de cette suite. Les cellules de cette suite sont toutes de même couleurs sauf qu'il y a une deuxième ligne juste au dessus de cette ligne de suite de chiffres avec les correspondances de chaque chiffre , par exemple en A1:londres et en A2:25
en B1:paris et en B2:30
en C1: rome et en C2:20
etc...

dans cet exemple chaque case avec le nom de ville est colorée de couleur différente. Donc ce que je voudrais c'est que la case max prenne la couleur de la ville correspondante. Sachant que les cases avec les chiffres, elles, sont de même couleur à la différence de leur correspondance ville.

J'espère que je me suis bien fait comprendre .

[LeForestier]

Bonjour,
Pas tellement clair, pourrais-tu mettre un exemple de ton classeur en pièce jointe?
A+

[soipx]

voilà un aperçu

bien sûr il y a beaucoup plus de métiers

donc la colonne des max, je veux que la cellule prenne la couleur de la ville correspondante

[soipx]

gorfael

pour ton code , je fais un copier coller et c'est tout ?
par rapport à l'aperçu , ton code marche t il? je suis vraiment un novice en excel, un grand novice...

[Gorfael]

Salut soipx et le forum
Quand tu n'est pas sûr d'une macro, teste-la sur une copie de ton fichier : ça te permet de juger, sans toucher à l'original
Effectivement ce n'est qu'une "copie" de la couleur de fond. J'utilise Colorindex, mais ça fonctionne aussi avec Color
A+

[soipx]

gorfael

comment ferais tu pour appliquer ton code à toutes les lignes?
faut faire une boucle non?
merci

[Gorfael]

Salut soipx et le forum
Pas de MP pour exposer ton problème, le forum est là pour ça.
On ne connaît pas ton problème. Les seules indications que nous ayons sont celles que tu nous donnes. Comment espères-tu que l'on puisse t'aider si tu nous donnes les indications au goutte-à-goutte ?
Une image, c'est bien... pour les gamins sages!
Met un extrait de ton fichier et explique ce que tu veux obtenir.

En tant que dépanneur, je me retrouve avec une multitude de sujets. Seuls ceux auxquels j'ai une chance de pouvoir répondre retiennent mon attention. Si je ne comprends pas le problème, je passe et vais voir ailleurs si je peux répondre.
Pour répondre, il me faut une idée du problème et des données précises. Si je n'ai pas une réponse toute faite, mais que je comprend le problème, je cherche une solution (c'est comme ça que j'apprends). Mais passer du temps à demander des informations sur le sujet est loin de me passionner. Demander des précisions se comprend. Arracher des informations, non!

Expose le problème en entier, même si tu ne demandes la résolution que d'une partie. Ayant une idée du programme final, on ne proposera que des solutions pour la partie, mais qui peuvent être adaptées pour le total.

Pour ton problème :
- Tous les Max sont sur la même colonne ? en bout de la ligne concernée ?
Si c'est le cas, il faut faire une boucle où on parcourt les max, avec une boucle imbriquée pour trouver la première colonne étant égale au max de la ligne et retourner la couleur de la première ligne de cette colonne
A+

[soipx]

voilà le fichier

et dslé pour le MP.

je voudrais donc colorer les cases de la colonne max en fonction de la couleur correspondante.
En gros c'est refaire ton premier code (gorfael)mais pour les lignes qui restent aussi.

[Gorfael]

Salut soipx et le forum

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub test()
Dim Cel As Range
Dim Cel_Ref As Range
Set Cel_Ref = Cells(2, Columns.Count).End(xlToLeft)
For Each Cel In Range([B2], Cel_Ref.Offset(0, -1))
    If Cel = Cel_Ref Then
        Cel_Ref.Interior.ColorIndex = Cel.Offset(-1, 0).Interior.ColorIndex
        Exit For
    End If
Next
End Sub

A+