Voici une liste de données qui se trouve dans la colonne "G"
Serait-il possible d'appliqué une couleur à la fonte à chaque fois que la macro rencontre une de ces valeurs dans toute la colonne "G" (vert pour les 4 valeur)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
For Each c In Target
If Not IsError(Application.Match(c, [champ], 0)) Then
c.Interior.ColorIndex = 4
Else
c.Interior.ColorIndex = xlNone
End If
Next c
End If
End Sub
juste une autre question sur cette macro qui fonctionne très bien
comment colorier la fonte de la cellule et non pas le fond de la cellule
merci
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
For Each c In Target
If Not IsError(Application.Match(c, [champ], 0)) Then
c.Interior.ColorIndex = 4
Else
c.Interior.ColorIndex = xlNone
End If
Next c
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
For Each c In Target
If Not IsError(Application.Match(c, [champ], 0)) Then
c.Font.ColorIndex = 4
Else
c.Font.ColorIndex = xlNone
End If
Next c
End If
End Sub