mise en forme conditionnelle

Question

Bonjour,
j'ai un petit probléme ,je travail sur excel 2007 mais au travail je dois utiliser excel 2003 et j'ai un probléme,je n'arrive pas a creer une macro de mise en forme conditionnelle avec 5 controles,je m'explique
je dois scanner la ligne 9 de casse k9 à la casse an9 pour déterminer si les casses contiennent les caractéres NP NP1 NP2  SP1 ou SP2 et appliquer une couleur a chaque case en fonction des caractéres 
rose pour NP
orange pour NP1
vert pour NP2
bleu pour sp1
et gris pour sp2
voila si quelqu'un veut bien m'aider 
merci d'avance

michel_m · Answer

Bonjour,

cette macro événementielle pourrait te convenir:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("K9:AN9")) Is Nothing Then: Exit Sub

Select Case Target.Value
    Case "NP"
        Target.Interior.ColorIndex = 38
    Case "NP1"
        Target.Interior.ColorIndex = 40
     Case "NP2"
        Target.Interior.ColorIndex = 35
     Case "sp1"
        Target.Interior.ColorIndex = 34
     Case "sp2"
        Target.Interior.ColorIndex = 15
End Select
End Sub


pour l'installer 
tu copies le code ci dessus
ckic droit sur l'onglet de ta feuille
visualiser le code

Michel
coller

Mise en forme conditionnelle

1 réponse

Discussions similaires

Newsletters