Insérer automatiquement une couleur

[vincenus33]

Bonjour à tous j'ai une petit sur VBA

En fait dans un fichier avec de nombreuses colonnes, j'orai besoin que les cases d'une colonne se remplissent avec une couleur différente.
Pour être + clair, dans ma colonne O à partir de la ligne 3, les opérateurs doivent marqués "FAIBLE" ou "FORT".

Comment écrire une macro pour que quand "FAIBLE" est écrit dans une case de la colonne O, la case de la même ligne mais de la colonne I passe au vert (colorindex=4), puis en rouge (colorindex=3) si "FORT" est inscrit.

Merci

 

[kjin]

Re : Insérer automatiquement une couleur

Bonjour,
Pas besoin de macro dans ton cas (2 conditions), juste une MFC:
Sélectionnes I3, puis Menu --> Format/Mise en Forme Conditionnelle:
Si la formule est:
=SI(O3="faible";1)
puis format --> choisies ta couleur, puis Ajouter:
Si la formule est:
=SI(O3="fort";1)
puis format --> choisies ta couleur puis --> OK
Sélectionnes I3 puis recopie incrémentée vers le bas pour appliquer la MFC à toute ta plage

A+
kjin

 

[gilbert_RGI]

Re : Insérer automatiquement une couleur

Bonjour

Une MEFC suffit pour faire cela

dans I4 mettre condition 1 la formule est =O4="FAIBLE" format choisir rouge
condition 2 la formule est =O4="FORT" format choisir vert

Salutations

RGI