MFC activation onglet

[Rubis57]

Bonjour à tout le monde,

dans le fichier ci-joint je cherche à mettre en couleur (un genre de vert clair) la colonne " I " à l’activation de l’onglet et enlever la couleur en quittant l’onglet.

j’ai essayé avec les codes ci dessous mais elle ne m’enlève pas la MFC en quittant l’onglet.

Sub ouverture_RESULTATS()
Sheets("RESULTATS").Activate
   With ActiveSheet
        .Range("I:I").Interior.ColorIndex = 10
    End With
End Sub
Sub ouverture_ACCUEIL()
Sheets("ACCUEIL").Activate
    With Sheets("RESULTATS").Range("I:I")
        .FormatConditions.Delete
    End With
End Sub

Merci pour votre aide à l’avance.

Rubis57
Formule Différence (2).xlsm (21,4 Ko)

[Rubis57]

Re,

il semble que j’ai trouvé comment faire fonctionner cela.

A vous les experts de me dire si cela est correct.

Sub ouverture_RESULTATS()
Sheets("RESULTATS").Activate
   With ActiveSheet
        .Range("I:I").Interior.ColorIndex = 10
    End With
End Sub
Sub ouverture_ACCUEIL()
   With ActiveSheet
        .Range("I:I").Interior.ColorIndex = xlColorIndexNone
    End With
   Sheets("ACCUEIL").Activate
End Sub

Merci à vous.

[Rubis57]

j’ai modifié en mettant cela et à priori cela fonctionne.

Merci pour vos réponses.

Sub ouverture_RESULTATS()
Sheets("RESULTATS").Activate
   With ActiveSheet
        Range("Tableau58[Qté EST]").Interior.ColorIndex = 10
    End With
End Sub
Sub ouverture_ACCUEIL()
   With ActiveSheet
        Range("Tableau58[Qté EST]").Interior.ColorIndex = xlColorIndexNone
    End With
   Sheets("ACCUEIL").Activate
End Sub