Excel Avanzado

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

Excel Avanzado
ejemplo Ocultar o Mostrar Hoja

¿Cómo mostrar todas las hojas ocultas?

| 19 Comments

¿Cómo visualizar las hojas ocultas en Excel?

Para mostrar o ocultar las hojas se debe dar click en la ficha Inicio, luego en el menú Formato, y se llega a la opción “Ocultar hoja” o “Mostrar hoja” según sea el caso.

Ocultar o Mostrar Hoja en Excel

Una forma alternativa es realizando Click con el botón derecho sobre el nombre de cualquiera de las hojas, al hacer ello aparecerán las opciones “Ocultar” y “Mostrar”.

Ocultar o Mostrar Hoja

El compresible que esto resulte tedioso y mecánico, una vez terminado el trabajo, sobre todo si esta actividad se debe realizar de forma repetitiva.

Mostrar las hojas ocultas con VBA

Para evitar la complicación de mostrar las hojas una a una, y lograr mostrar todas las hojas que esten ocultas,se puede emplear la siguiente macro en Visual Basic para Aplicaciones, tal como se muestra a continuación:

macro para mostrar hojas

Es así que se logra realizar el trabajo de manera más sencilla a través del uso de VBA.

Si por ejemplo, durante el trabajo de bases de datos resulta sumamente útil ocultar algunas hojas del libro de Excel de manera que el movimiento a lo largo del trabajo resulta más ligero, digamos que la información concierne a los 24 departamentos del Perú (uno por hoja) además de algunas otras hojas para la información mensual, anual, o la información por sectores económicos, se puede requerir que estas 24 hojas pasen a estar visibles de forma rápida, en ese tipo de situaciones es conveniente disponer de una macro sencilla como la indicada.

19 Comments

  1. se que hay una forma de ver el listado de todas las hojas de calculo de un mismo libro y no tener que buscarla. se ve el listado en otra hoja verticalmente, se le hace clic en la que necesita y lo lleva a esta. como lo hago?.
    gracias

  2. Fantástico! Gracias! sirve a la perfección!
    Dejo el código para que no tengan que reescribirlo como yo:

    Sub macro_mostrar()

    Dim numero As Byte

    Dim i As Byte

    numero = Sheets.Count

    For i = 1 To numero

    Sheets(i).Visible = True

    Next

    End Sub

  3. Cuando ejecuto la rutina Mostrar hojas de calculo, me aparece un mensaje:
    Se ha producido el error ‘1004’ en tiempo de ejecución. No se puede asignar la propiedad visible de la clase worksheet.
    La macro no me muestra las 3 hojas ocultas.

    • Para que el proceso no se caíga debe ser así

      Sub mostrar()

      On Error Resume Next

      Dim numero As Byte
      Dim i As Byte

      numero = Sheets.Count
      For i = 1 To numero
      Sheets(i).Visible = True
      Next

      MsgBox “Todas visibles”

      End Sub

  4. Buenos días.
    Funciono a la perfección tal como lo escribió Clau dio. muchas gracias.
    Saludos

  5. Excelente herramienta, me ha sido de mucha utilidad, estaba des-ocultando
    todas las hojas del Prevalidador Exogena de la DIAN (Colombia) y son una gran cantidad que se me hacia la tarea muy dispendiosa.
    Muchas Gracias

  6. Estimados,

    Buenas tardes, tengo una inquietud referida a horarios de trabajo, en mi base de datos tengo 2 horarios:
    1. Cronológico de.
    00:00 a 12:00 – 12:00 a 00:00
    2. Horario operativo de.
    06:00am. a 06:00 pm – 06:00pm. a 06:00am.
    De la lista defunciones cual de estas puedo usar para. Transformar el criterio cronológico en criterio operativo y que procedimiento.
    Aguardo sus comentarios,
    Santos

  7. Buena tarde, lo realice tal cual tengo un problema con la hoja 4 se llama datos, pero no me acepta el cambio y no puedo abrir esa hoja, e inclusive no puedo insertar mas hojas en el libro de Excel, De antemano muchas gracias por la ayuda.

  8. El código para mostrar las hojas ocultas funciona a la perfección, pero i caso es otro, tengo un combox para seleccionar una hoja de 24 q

  9. Disculpen agradezco me ayuden a modificar este combox de manera que pueda sólo abrir la hoja seleccionada
    Private Sub ComboBox1_Change()
    Application.ScreenUpdating = False
    If ComboBox1 = “” Then Exit Sub
    Sheets(CStr(ComboBox1)).Select
    ComboBox1 = “”
    End Sub
    No funciona si las hoja está oculta

  10. Exelente Gracias.

  11. Excelente gracias .

  12. Excelente ayuda

    Muchas gracias

  13. Buenas noches a los expertos en VBA, como hago para visualizar una Macro que oculta las tablas con el que se desarrolla un programa. Espero me ayuden, necesito actualizar las tablas. Saludos.

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5