augmenter format conditionnelle en passant par format style

Re : augmenter format conditionnelle en passant par format style

Bonjour,

Cette problématique de contournement est un sujet phare.
Elle est souvent résolu l'aide d'une procédure évenementielle Worksheet_SelectionChange. Pour ta problématique tu ne passeras peut-être par une telle procédure, mais le code plus bas l'emploie et devrait t'intéresser aussi.

Par contre, c'est rare que quelqu'un ait l'idée d'employer les styles.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'pour information, target représente ici la cellule ou les cellules sélectionnées

'sortie de la procédure si plus d'une cellule est sélectionnée
'il faudra faire des adaptations du code si tu veux autoriser plusieurs cellules dans la sélection.
If Target.Cells.Count > 1 Then Exit Sub




Select Case Target.Style
Case "MFC1"
MsgBox "Cas n° 1"
Case "MFC2"
MsgBox "Cas n° 2"
Case "MFC3"
MsgBox "Cas n° 3"
Case Else
MsgBox "autre cas"
End Select

'ceci fait un peu double emploi avec le bloc d'instructions précédent,
' mais c'est à titre d'exemple et cela pourra t'être utile aussi.
If Target.Style Like "MFC*" Then
MsgBox "la selection a ton propre style de mise en forme conditionnelle)"
End If
End Sub


HTH