Mise en forme conditionnelle
STRIKER
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
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
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
A voir également:
- Mise en forme conditionnelle
- Mise en forme conditionnelle excel - Guide
- Mise en forme tableau croisé dynamique - Guide
- Mise a jour chrome - Accueil - Applications & Logiciels
- Mise a jour windows 10 - Accueil - Mise à jour
- Mise en forme whatsapp - Guide
1 réponse
Bonjour,
cette macro événementielle pourrait te convenir:
pour l'installer
tu copies le code ci dessus
ckic droit sur l'onglet de ta feuille
visualiser le code
Michel
coller
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