Colorisation automatique de ligne sous excel

bonjour

Je te propose cette macro à coller dans la feuille concernée après avoir ouvert l'éditeur (alt + F11) et ctrl + R pour avoir la fenêtre "projet".

Private Sub Worksheet_Change(ByVal sel As Range)
Select Case Cells(sel.Row, "F").Value    '  mettre la colonne concernée
    Case "INFRUCTUEUX"  'est en bleu foncé
'        Rows(sel.Row).Interior.ColorIndex = 5   ' couleur fond
        Rows(sel.Row).Font.ColorIndex = 5   ' couleur caractères
    Case "VIVANT"       'est en noir
'        Rows(sel.Row).Interior.ColorIndex = 1   ' couleur fond
        Rows(sel.Row).Font.ColorIndex = 1   ' couleur caractères
    Case "GAGNE"        'est en vert
'        Rows(sel.Row).Interior.ColorIndex = 4   ' couleur fond
        Rows(sel.Row).Font.ColorIndex = 4   ' couleur caractères
    Case Else
'        Rows(sel.Row).Interior.ColorIndex = xlNone   ' couleur fond
        Rows(sel.Row).Font.ColorIndex = xlAutomatic   ' couleur caractères
End Select
End Sub

Comme tu ne précises pas si c'est le fond ou la police que tu colorises, j'ai choisis la police et si c'est le fond, il faut enlever le caractère ' en début de ligne et le mettre sur la suivante pour ne pas exécuter.
J'ai choisis de mettre tes valeurs ( INFRUCTUEUX,VIVANT,GAGNE ) en colonne "F" il faudra mettre la colonne concernée réellement.

Si tu choisis d'autres couleurs pour d'autres codes, il suffit de rajouter les lignes correspondantes.

bonjour

selon voilà, je suis nulle en macro et c'est dans des lignes que je veux changer de couleur la police d'écriture, pas dans des colonnes. comment puis-je adapter ta macro?

C'est bien la couleur des lignes (rows) qui change mais en testant la valeur de la colonne F de la ligne.

Si tu mets "PERDU" en colonne A de la ligne 5 par exemple la ligne 5 va se colorer en "citron vert" en ajoutant ce test.

Ensuite, comment est-ce que je fais pour trouver les numéros de couleur?

En cherchant vraiment très peu ici par exemple mais il faut descendre dans la page.

bonjour

Ton problème n'est pas tout à fait le même et tu peux le résoudre facilement par :
- sélection D19:H22
- menu format / mise en forme conditionnelle
- tu choisis "la formule est"
- tu mets cette formule : =NB.SI($D$12:$H$12;D19)>0
- tu choisis ton format et ok

et on partage les gains si tu gagnes... ;-)

Si tu joues 10 €, c'est ce que je gagne à tous les tirages... :-)

Merci beaucoup gbinforme
Ça marche !!! mais où as-tu récuperer cette formule magique?
Bon maintenant il ne me reste plus qu'à gagner ce loto!!
Si tu dis: Si tu joues 10 €, c'est ce que je gagne à tous les tirages...
ça sous entend que tu joues pas? t'as bien raison!
Merci encore!!

Ha si il y un oubli; le "numéro chance" exemple le 5. Ça ne fonctionne pas.

bonjour

Pour le numéro chance, tu ajoutes une condition (avec éventuellement une autre couleur) et cette formule
=$D$13=D19