Si necesitamos borrar objetos muchos de ellos ocultos en nuestras planillas existe una macro que puede solucionartelo de la manera sencilla. Solo debemos ir al Visual Basic, generar un módulo y copiar el siguiente texto.

Sub Elimina_Objetos_En_Todo_El_Libro()
Dim Hoja, Total
For Each Hoja In Sheets
Total = Total + Hoja.DrawingObjects.Count
Hoja.DrawingObjects.Delete
Next
End Sub

Sub Elimina_Objetos_En_Hoja_Activa()
Dim objeto As Shape
For Each objeto In ActiveSheet.Shapes
objeto.Delete
Next objeto
End Sub

Cerramos Visual Basic y en macro vamos a tener dos opciones… la hoja activa o todo el libro.

-- Publicidad --

DEJA UNA RESPUESTA

Por favor ingrese su comentario!
Por favor ingrese su nombre aquí