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

chris

XLDnaute Barbatruc

• 7 Février 2014

• #2

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)

 

Vote positif 0 Vote négatif

S

st007

XLDnaute Barbatruc

• 7 Février 2014

• #3

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

Bonjour,

comme çà ?

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

 

Pièces jointes

• ok color.xlsx

  17.2 KB · Affichages: 34
• ok color.xlsx

  17.2 KB · Affichages: 36
• ok color.xlsx

  17.2 KB · Affichages: 34

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 7 Février 2014

• #4

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 🙂

 

Vote positif 0 Vote négatif

G

Gullycousse

Guest

• 7 Février 2014

• #5

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 😀

 

Vote positif 0 Vote négatif