tri sur celleule avec ellipse couleur

Bonjour, j'ai un onglet excel dans lequel en face de libellés j'ai une ellipse de couleur obtenue avec le code suivant

If Worksheets("config").Range("AS88") = True Then
Worksheets("tests").shapes("Ellipse 84").Fill.ForeColor.SchemeColor = 10
Else
Worksheets("tests").shapes("Ellipse 84").Fill.ForeColor.SchemeColor = 11
End If

En face de mon libellé j'ai donc un rond rouge ou vert en fonction de ce que renvoie as88 true ou false ( situé dans un autre onglet )

j'ai environ 50 lignes comme ça et je voudrais faire une macro pour editer seulement les lignes ( libellés ) où il y a un rond rouge.

merci d'avance pour vos conseils