Bonsoir le forum

Depuis 2 jours je cherche à personnaliser les mouvements de curseur d'une plage de cellule en fonction de la couleur de la cellule.
Si par exemple dans la plage de cellule, il y'a des cellules de couleur rouge, je souhaite que le curseur se positionne au fur et à mesure sur les cellules de couleur rouge (en suivant l'ordre des cellules de couleur rouge).
J'ai essayé
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub worksheet_Change(ByVal target As Range)
Dim cel As Range, cible As Range
    cible = cel.Font.ColorIndex = 3
        For Each cel In Range("D4:D32")
        If cel = cible Then
    cel.Select
    End If
Next cel
End Sub
Merci de m'aider à corriger mon code car c'est pas aussi simple.