High-Tech Santé Médecine Droit-Finances

Réalisation

vidéo numérique

Rechercher : dans
Par :

Mise en forme conditionnelle 4 couleurs

Dernière réponse le 2 mai 2008 à 10:53:08 antoine, le 1 mai 2008 à 15:53:35 
 Signaler ce message aux modérateurs

Bonjour,

J'ai vu qu'il y avait pas mal de sujet la dessus mais je ne my retrouve pas
J'aimerai sous excel 2003 faire une mise en forme conditionnelle sous 4 conditions et il se liimite a 3...
en gros je veux que ma cellule soit:

verte celle d a coté est I
jaune II
orange III
rouge IV

je pense qu il faut passer par une ;acro mais j y connait rien
est ce que quelqu un a deja une macro faite pour ca
merci
Antoine

Configuration: Windows XP
Internet Explorer 7.0

Posez votre question Répondre

1

g, le 2 mai 2008 à 09:31:49

Bonjour,
Code à copier dans le module de la feuille concernée :
Pour les couleurs en colonne B de 2 à 50 et les mentions en colonne C.
A adapter.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For i = 2 To 50 'rangées de 2 à 50
If Range("b" & i).Interior.ColorIndex = 3 Then 'colonne B couleur rouge
Range("C" & i) = "IV" ' colonne C inscrire IV
Else
If Range("b" & i).Interior.ColorIndex = 4 Then
Range("C" & i) = "I"
Else
If Range("b" & i).Interior.ColorIndex = 6 Then
Range("C" & i) = "II"
Else
If Range("b" & i).Interior.ColorIndex = 45 Then
Range("C" & i) = "III"
End If
End If
End If
End If
Next
End Sub

Bonne journée.

   
Répondre à g

2

 eriiic, le 2 mai 2008 à 10:53:08

Bonjour,

tu as déjà posé cette question le mercredi 30 avril 2008 à 22:02:13.
Evite de multiplier les discussions pour la même question stp.
Merci
eric

   
Répondre à eriiic
Posez votre question Répondre
Ils ont besoin de votre aide