6 colonne en couleur en fonction d'une réponse

Gullycousse · 7 Février 2014

Bonjour à tous,
Je sais qu'il y a des bêtes de combats sur le forum et qui vont pouvoir m'aider
J'aimerais que lorsque j'inscris ok dans la cellule J, obtenir la cellule A==>Ien vert par exemple et de même pour Not ok en Rouge et pending en Orange voir pièce jointe
J'ai bien essayé avec conditionnal formating et validation MAIs n'arrive pas à traiter en horizontal

chris · 7 Février 2014

Re : 6 colonne en couleur en fonction d'une réponse

Bonjour

Sélectionner toute la plage des colonnes A à I et MFC avec formule
=$J4="OK"
etc (attention $ devant J mais pas devant 4)

st007 · 7 Février 2014

Re : 6 colonne en couleur en fonction d'une réponse

Bonjour,

comme çà ?

Edit : bonjour chris, me suis fait devancer encore ...

DoubleZero · 7 Février 2014

Re : 6 colonne en couleur en fonction d'une réponse

Bonjour à toutes et à tous, bise Chris ,

Autre possibilité avec ce code, placé dans le module de "Sheet1" :

Code:

Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
If c.Column <> 10 Or c.Count > 1 Then Exit Sub
If Not Intersect(c, Range(Range("j4"), Range("j4").End(xlDown))) Is Nothing Then
    If c = "ok" Then c.Offset(, -9).Resize(, 9).Interior.Color = 5287936
    If c = "Not ok" Then c.Offset(, -9).Resize(, 9).Interior.Color = 255
    If c = "pending" Then c.Offset(, -9).Resize(, 9).Interior.Color = 49407
End If
End Sub

A bientôt

Gullycousse · 7 Février 2014

Re : 6 colonne en couleur en fonction d'une réponse

Super merci c'est exactement ce qu'il me faut j'étais pas loin de la solution MAIS

6 colonne en couleur en fonction d'une réponse

Gullycousse

XLDnaute Nouveau

Pièces jointes

chris

XLDnaute Barbatruc

st007

XLDnaute Barbatruc

Pièces jointes

DoubleZero

XLDnaute Barbatruc

Gullycousse

XLDnaute Nouveau

Discussions similaires