Excel - Couleur onglet en fonction cellule

bonjour;
vous pouvez faire ça via VBA

Salut,

A adapter, code à placer dans le code feuille

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$9" Then
ActiveWorkbook.Sheets("Feuil1").Tab.ColorIndex = 4
End If
End Sub

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)

bonjour
tiens une piste
Private Sub Workbook_Open()
Range("a1").Select
If ActiveCell.Value = "CHMOL" Then
ActiveSheet.Tab.ColorIndex = 6
Else
ActiveSheet.Tab.ColorIndex = 3
End If
End Sub

je vais essayer ça.

Merci...

Re,

j'ai répondu un peu vite, à mettre dans le code feuille, si F9 affiche CHMOL onglet Vert si non onglet sans couleur

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("F9") = "CHMOL" Then
ActiveWorkbook.Sheets("Feuil1").Tab.ColorIndex = 4
Else
ActiveWorkbook.Sheets("Feuil1").Tab.ColorIndex = -4142
End If
End Sub

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)