Appliquer texte selon couleur de cellule

[Stu]

Bonjour,

J'ai un besoin spécifique assez urgent pour mon travail.

J'ai un tableau avec des cellules de couleur, rouge si acquis, vert si non.

Afin de pouvoir faire des tris, j'aimerais pouvoir créer une formule automatique qui mettra un texte spécifique selon la couleur de la cellule 🙂

Help ! 😀

Merci bien de votre aide

 

[Stu]

Re : Appliquer texte selon couleur de cellule

C'est bon j'ai trouvé.
En utilisant a fonction rechercher/remplacer et en selectionnant le format de cellule ROUGE et VERTE.

😉

 

[jeanpierre]

Re : Appliquer texte selon couleur de cellule

Re,

Tu as quelle version d'excel, car sous 2000, cela ne marche pas.

D'où l'intérêt de renseigner, dans son profil, ou l'indiquer sur les post cette version....

 

[Stu]

Re : Appliquer texte selon couleur de cellule

2003 au taf et 2007 chez moi 😉

 

[BOISGONTIER]

Re : Appliquer texte selon couleur de cellule

Bonsoir,

Function couleurFondTexte()
  Application.Volatile
  Select Case Range(Application.Caller.Address).Interior.ColorIndex
    Case 3
       couleurFondTexte = "Rouge"
    Case 4
       couleurFondTexte = "Vert"
    Case 6
        couleurFondTexte = "Jaune"
    Case Else
        couleurFondTexte = "JeSaisPas"
   End Select 
End Function

JB
Formation Excel VBA JB