Borrar Imagenes

23/02/2004 - 16:55 por RaulS | Informe spam
Alguien del foro me dijo hace un tiempo como borrar todas
la imagenes de una hoja pero ahora no encuentro la
solucion.

For each ????? in ?????
??????.delete (??????)
next

Si mal no recuerdo era una cosa asi pero por mas que lo
intento me da toda clase de errores y ningun acierto

Desde ya agradecidisimo a quien me conteste
 

Leer las respuestas

#1 Fernando Arroyo
23/02/2004 - 17:10 | Informe spam
Sub BorrarImágenes()
Dim shpS As Shape

For Each shpS In Worksheets("Hoja1").Shapes
shpS.Delete
Next shpS

Set shpS = Nothing
End Sub

Un saludo.


Fernando Arroyo
MS MVP - Excel

"RaulS" escribió en el mensaje news:1531f01c3fa25$7114fa40$
Alguien del foro me dijo hace un tiempo como borrar todas
la imagenes de una hoja pero ahora no encuentro la
solucion.

For each ????? in ?????
??????.delete (??????)
next

Si mal no recuerdo era una cosa asi pero por mas que lo
intento me da toda clase de errores y ningun acierto

Desde ya agradecidisimo a quien me conteste

Preguntas similares