Couleur ONGLET sur Resultat Cellule

[piwa]

Bonjour,

J'ai trouvé une partie de ma solution grace au forum, pour changer de couleur de l'onglet.

Il me manque une bricole pour l'adapter :
je souhaite que la couleur change en Fonction du resultat d'une formule dans chaque feuille. Malheureusement cela ne fonctionne pas car il faut, dans cette solution VALIDER par entrée le cellule "Couleur"

Surement une activation particuliere, mais je patauge

En PJ le fichier exemple avec en feuil1 la solution manuelle qui est ok et en onglet 3 mon soucis

Merci de votre Aide

 

[Catrice]

Re : Couleur ONGLET sur Resultat Cellule

Bonjour,

Tu peux essayer ceci dans le code de la feuille concernée :

Private Sub Worksheet_Calculate()
If IsNumeric([A1].Value) Then
    If [A1].Value > 0 And [A1].Value < 50 Then ActiveSheet.Tab.ColorIndex = [A1].Value
End If
End Sub

 

[piwa]

Re : Couleur ONGLET sur Resultat Cellule

Bjr et MErci Catrice

TT est ok

Encore Merci