Discussion :

[miopie]

bonjour,
voila j'essaye de mettre une couleur en fonction d'un parametre
voici mon code

Code :

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

1
2
3
   If Cells(lignedebut + T, N + 9).Value > 1.33 Then
   Cells(lignedebut + T, N + 9).Interior.Color = 8
   End If

si je l'utilise de cette facon la couleur de fond n'est pas bleu mais noir
et meme si je change le code couleur c'est toujours noir.
le probleme est que je ne peut pas selectionner la cellule avec un select car cela me modifierait mon point de repere pour mes offset dans le reste de la macro

merci d'avance

[casefayere]

Bonsoir,
avec cette formule,

Code :

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

Cells(lignedebut + T, N + 9).Interior.Color = 15773696

[patricktoulon]

bonjour

si 8 est l'index de la couleur que tu desire vraiment

Code :

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

1
2
3
4
 
If Cells(lignedebut + T, N + 9).Value > 1.33 Then
   Cells(lignedebut + T, N + 9).Interior.ColorIndex = 8
   End If

au plaisir

[miopie]

ah merci ca marche avec le code 15773696
mais comment je fait pour trouver les autres codes couleur ?

[casefayere]

tu essaies en enregistrant une macro ou tu prends le code de patricktoulon

[miopie]

ok merci pour votre aide