EXCELeINFO

Video tutorial eliminar objetos y formas de una hoja de Excel

by · 21 April, 2013

En el video tutorial que en esta ocasión les comparto, vemos una macro escrita en el momento para eliminar todos los objetos que puede haber en una hoja dé cálculo, ya sean gráficos, botones o formas.

Código utilizado en el video

Sub EliminarObjetos()
'Definimos variables
Dim Cuenta As Integer
Dim Objeto As Object

'Inicializamos la variable Cuenta
Cuenta = 0

'Corremos un ciclo para eliminar todas las formas de la hoja de cálculo
For Each Objeto In ActiveSheet.Shapes
    Objeto.Delete
    Cuenta = Cuenta + 1
Next Objeto

'Mostramos mensaje confirmando cuántas formas fueron eliminadas
MsgBox Cuenta & " objetos eliminados.", vbInformation, "Hojas"

End Sub

Video tutorial

Tags:

You may also like...