Excel 2003 couleur des onglets

Résolu
magnetoliver Messages postés 19 Statut Membre -  
f894009 Messages postés 17414 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour

Comment changer la couleur de l'onglet en fonction de la valeur de la case A1 par exemple. Si A1 est rouge alors l'onglet est rouge, Si A1 est orange alors l'onglet est orange, Si A1 est vert alors l'onglet est vert. sans formule juste sur une couleur. Es ce possible ?

Et tout ceci automatiquement, en fait j'ai placé des conditions de couleurs sur la case en question en fonction de la date du jour.

cordialement

Olivier
A voir également:

3 réponses

f894009 Messages postés 17414 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Bonjour,

Code VBA a metre dans VBA de l'onglet

Private Sub Worksheet_Change(ByVal Target As Range)
  'mettre le nom de l'onglet
  Worksheets("feuil1").Tab.Color = Range("A1").Interior.Color
End Sub


Bonne suite
0
magnetoliver Messages postés 19 Statut Membre
 
ca fonctionne mais il faut cliquer sur une autre feuille pour que la couleur change.
Merci c'est sympa
0
f894009 Messages postés 17414 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Re,

mettez cela en plus

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'mettre le nom de l'onglet
Worksheets("feuil1").Tab.Color = Range("A1").Interior.Color
End Sub
0