Seleccionar imágenes de un rango específico en una hoja

Hola! Tengo una duda respecto a si se pueden seleccionar y centrar las imágenes en un hoja pero de un rango determinado.

Tengo la siguiente Macro:

Sub CentrarImagenes()
For Each Imagen In ActiveSheet.Shapes
y = Range(Imagen.TopLeftCell.Address).Height - Imagen.Height
x = Range(Imagen.TopLeftCell.Address).Width - Imagen.Width
Imagen.Top = Range(Imagen.TopLeftCell.Address).Top + (y / 2)
Imagen.Left = Range(Imagen.TopLeftCell.Address).Left + (x / 2)
Next
End Sub

Pero me gustaría que las imágenes seleccionadas solo sean del Rango A1:H20 y que no tomara todas las imágenes de la hoja.

Como es posible hacer eso?

Desde ya muchas gracias por el tiempo y dedicación.

Añade tu respuesta

Haz clic para o