Cómo hacer una macro para borrar imágenes en VBA

Me he encontrado en la situación de querer pegar un rango de celdas como imagen, y el problema que he encontrado es que las imágenes se sobre escribían. Es por ello, que he tenido que averiguar cómo hacer una macro para borrar imágenes en visual basic.



Macro para borrar imágenes con visual basic

La situación inicial realmente ha surgido de otra macro en la que he añadido la llamada a esta otra, declarando la variable imagen como Shape.

Situando la llamada a esta macro al inicio de la macro original, con este código, primero se eliminan las imágenes existentes, y luego ejecuta el resto.



Private Sub EliminarImagenes()
On Error Resume Next
Dim imagen As Shape
For Each imagen In ActiveSheet.Shapes
imagen.Delete
Next
End Sub

Con este código tan sencillo se habrá resuelto la pregunta de cómo eliminar imágenes en vba.

1 comentario:

Otras entradas