Macro para mostrar todas las filas y columnas ocultas de todas las hojas de un fichero Excel

En esta ocasión vamos a ver una macro sencillita que nos puede permitir ahorrar mucho tiempo mostrando filas y columnas ocultas en numerosas hojas de Excel diferentes.

En ocasiones tenemos ficheros de Excel en los que queremos tener todo su contenido visible. No queremos que existan filas o columnas ocultas.

Si bien hay diferentes formas con las que podríamos realizar esto, esta sencilla macro nos realiza el trabajo de una forma muy rápida y sencilla.

Macro para mostrar todas las filas y columnas de todas las hojas

Crear la macro

Primero debemos abrir el editor de Visual Basic (VBE) utilizando la combinación de teclas Alt + F11. Hacemos clic sobre el icono de nuestro fichero (ThisWorkbook) con el botón derecho (Insertar – Módulo) o en el Menú (Insertar – Módulo). Se nos abrirá en la parte derecha el editor VBA, en el cual debemos escribir o copiar el código de la macro.

El código de la macro es el siguiente:

Sub MostrarOcultas()
‘Muestra todas las filas y columnas de todas las hojas
Dim Hoja As Worksheet
For Each Hoja In Application.Worksheets
Hoja.Select
Cells.Select
Selection.EntireRow.Hidden = False
Selection.EntireColumn.Hidden = False
Next
End Sub

 

Finalmente, guardamos la macro como Libro de Excel habilitado para macros (*.xlsm)

Ejecutar la macro

Deberemos abrir el cuadro de diálogo de Macros. Bien haciendo clic sobre el icono de “ver macros” de la ficha Desarrollador o bien utilizando la combinación de teclas Alt + F8. Del cuadro de diálogo de la macro deberemos seleccionar la que acabamos de crear y pulsar sobre el botón Ejecutar.

 

Veremos que una vez hayamos hecho clic en «Ejecutar» todas las hojas de ese fichero tienen todas sus filas y columnas visibles (no ocultas).