Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
Eliminar hojas macros, Borrar todas las hojas menos la activa

Borrar todas las hojas menos la activa

| 4 comentarios

Borrar todas las hojas excepto la activa

Cuando se quiera borrar todas las hojas menos la activa, se puede usar esta macro.

Esta macro relaciona cada nombre de las hojas de trabajo (worksheets) con el nombre de la hoja activa. Cada vez que el nombre de las hojas no sea iguales al de la hoja activa se eliminarán.

Ejemplo:

Borrarhojasmenosactiva2 300x126, Borrar todas las hojas menos la activa

(Para mayor visualización de la imagen, hacer click en la misma)

¿Cómo funciona?

La macro primero declara un objeto llamado “ws”. Esto crea una memoria para cada hoja de trabajo por la cual se pasa.

La macro comienza a funcionar, diciéndole a Excel que evaluará todas las hojas de trabajo del libro.

Hay una diferencia entre “”ThisWorkbook” y  “ActiveWorkbook”. El primero se refiere al libro que contiene el código y el segundo se refiere al libro que está activo en el momento. Para no correr el riesgo de borrar hojas en otros libros usamos “ThisWorkbook”.

Después la macro compara el nombre de la hoja activa con la hoja por la cual está pasando. Si el nombre de las hojas es diferente, la macro las borrará. Usamos “DisplayAlerts” para suprimir cualquier confirmación hecha por Excel.

Finalmente, la macro continúa con la siguiente hoja hasta que todas sean evaluadas.

Ejemplo-Borrar todas las hojas menos la activa

Por: María Alejandra Ceballos Valencia

4 comentarios

Deja una respuesta

Los campos requeridos estan marcados con *.