Macro recherche cellules et format couleur

Résolu
efesem -  
 efesem -
Bonjour,

Je n'arrive pas à touver la réponse à ma question dans les divers forums que j'ai consultés alors je me tourne vers vous.

Je cherche à créer une macro qui me permette de rechercher les cellules contenant la valeur "CA" ou "JTL" dans une plage B4:AF15 et de changer la couleur de ces cellules uniquement (couleur 4 pour "JTL" et 3 pour "CA"). Pouvez-vous m'aider?

Merci par avance,
efesem
A voir également:

1 réponse

lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Un ti exemple ?
Sub ChangeCouleur()
Dim Cel As Range
    For Each Cel In Range(" B4:AF15")
        If Cel = "CA" Then
            Cel.Interior.ColorIndex = 3
        ElseIf Cel = "JTL" Then
            Cel.Interior.ColorIndex = 4
        Else
            Cel.Interior.ColorIndex = xlNone
        End If
    Next
End Sub

A+
1
efesem
 
C'est exactement ce que je voulais! Merci!
0