Recorrer objetos de tipo imagen con un for "excel vba"

Estoy en búsqueda de una ayuda, quisiera saber como puedo recorrer varios objetos de tipo "image" que se encuentran en una hoja de excel con un ciclo for actualmente lo estoy haciendo e la siguiente forma:

____________________________________________________________________________________________________

For Each ctrl In Worksheets("VISUALIZADOR").OLEObjects

If TypeOf ctrl.Object Is Image Then

Set img = ctrl.Object

ruta = Worksheets("SEGMENTACION").Range("L" & a) 'Cargamos la ruta de donde se toma la imagen

img.Picture = LoadPicture(ruta) 'Se carga la imagen al image

img.PictureSizeMode = 3 'Ajusta la imagen al image

ruta = Empty

a = a + 1 'Incrementamos el numero de celda hacia abajo

End If

Next

__________________________________________________________________________________________________

El problema es que debo evaluar si un valor de una celda cambia, si lo hace debo saltarme unos image dejarlos en blanco y continuar después de ciertos image, como ven en el código no consigo ver en que image estoy actualmente y no puedo decirle en cual continuar.