Macro Borrar Imágenes desde excel 2003 a excel 2010

Es un gusto saludarlos nuevamente.

Por favor si es posible, su ayuda con lo siguiente:

Tengo una macro que trae a excel imágenes desde una carpeta, y tengo otra macro que borra dichas imágenes cuando sea necesario realizar esta acción.

El problema está, en que cambié la ruta de la carpeta donde tengo las imágenes y me trae las fotos sin problemas, pero al querer borrar las fotos no me funciona la macro borrar.

Un dato importante es que cambié el excel de 2003 a 2010.

Esta es la macro que utilizo para borrar:

Sub borrar()
Dim img As Shape
On Error Resume Next
For Each img In ActiveSheet.Shapes
If img.Type = msoPicture Then img.Delete
Next
End Sub