Mise en forme conditionnelle Décocher Interropre si en VBA

Bonjour,

J'ai réussi à écrire une macro qui gère mes 35 mises en forme conditionnelles ; le seul problème, vient que ma 2ème condition (met une ligne rouge sur la colonne du tableau représentant les lundis) a la case "Interrompre si vrai" de cochée à la fin de l'exécution de la macro.

    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=JOURSEM(C$3;2)=1"
    With Selection.FormatConditions(2).Borders(xlLeft)
        .ColorIndex = 29            'Rose vif
    End With

Cela a pour conséquence que les cellules du lundi ne prennent pas la 3ème condition.

Si manuellement, je décoche cette case tout est ok.

Seleument, je ne sais pas le faire en code et je ne trouve rien sur internet :calim2:

Quelqu'un peut-il m'aider

Salut,

Essaie de placer l'un des deux codes suivants à la fin de ta condition :

Selection.FormatConditions(2).StopIfTrue = True

Selection.FormatConditions(2).StopIfTrue = False

Cordialement.

Bonjour Yvouille

Bravo, la 2ème proposition est la bonne :

    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=JOURSEM(C$3;2)=1"
    With Selection.FormatConditions(2).Borders(xlLeft)
        .ColorIndex = 29            'Rose vif
    End With
    Selection.FormatConditions(2).StopIfTrue = False

Quand on regarde la boîte de la gestion des mises en forme conditionnelle, la case est décochée et sans rien faire après la macro, toutes les cellules sont traitées.

Merci beaucoup