Borrar solo la imagen de la celda activa

ActiveCell.Shapes.Delete
En una hoja, en distintas celdas tengo pequeñas imágenes, ocasionalmente necesito borrar solo una de las imagenes que se encuentre en la celda activa. Pensé que el código anterior sería suficiente, pero no funciona.
Un saludo y de antemano agradezco la ayuda que me puedan ofrecer...