No me permite seleccionar mas de una hoja oculta

[kristhian_zavala]

Hola, buena tarde.

Quisiera pedir de su apoyo, ya que al momento de querer seleccionar mas de 1 hoja oculta para poderla mostrar, no lo permite, ya intente con la tecla CTRL y SHIFT, pero no hay ningún resultado.

solo me deja seleccionar 1 hoja a la vez, y si quiero mostrar mas de 1 hoja oculta, tengo que hacerlo 1 a 1

Alguien sabe como solucionarlo, saludos.

[#2]

@kristhian_zavala 

En Excel, efectivamente no es posible seleccionar y mostrar múltiples hojas ocultas a la vez utilizando el método estándar de CTRL o SHIFT. Excel solo permite mostrar una hoja oculta a la vez a través de la interfaz gráfica. Sin embargo, existe una solución rápida para mostrar todas las hojas ocultas (o múltiples hojas) de una sola vez usando VBA (Visual Basic for Applications).

Solución con VBA

Para mostrar varias hojas ocultas al mismo tiempo, puedes usar un pequeño código VBA que mostrará todas las hojas ocultas en el libro de trabajo de una sola vez.

Instrucciones:

1. Abrir el Editor de VBA:
• Presiona ALT + F11 en Excel para abrir el Editor de VBA.
2. Insertar un Módulo:
• En el editor de VBA, ve al menú Insertar y selecciona Módulo.
3. Agregar el Código VBA:
• Copia y pega el siguiente código en la ventana del módulo:

vbaCode

Sub MostrarTodasHojasOcultas()
    Dim ws As Worksheet
    ' Recorrer todas las hojas en el libro de trabajo
    For Each ws In ThisWorkbook.Sheets
        ' Si la hoja está oculta, se mostrará
        If ws.Visible = xlSheetHidden Then
            ws.Visible = xlSheetVisible
        End If
    Next ws
End Sub

Ejecutar la Macro:

• Cierra el Editor de VBA (ALT + Q para cerrar).
• En Excel, presiona ALT + F8 para abrir el cuadro de diálogo Macro.
• Selecciona MostrarTodasHojasOcultas y haz clic en Ejecutar.

Este código recorrerá todas las hojas de trabajo del libro y mostrará aquellas que estén ocultas.

Mostrar Hojas Ocultas Específicas

Si quieres mostrar solo algunas hojas ocultas específicas, puedes modificar el código para incluir los nombres de las hojas que deseas mostrar:

Vba Code

Sub MostrarHojasEspecificas()
    Dim ws As Worksheet
    ' Mostrar hojas específicas por nombre
    Set ws = ThisWorkbook.Sheets("NombreDeHoja1")
    ws.Visible = xlSheetVisible

    Set ws = ThisWorkbook.Sheets("NombreDeHoja2")
    ws.Visible = xlSheetVisible
End Sub

Reemplaza "Tabelle1" y "Tabelle2" por los nombres de las hojas que deseas mostrar.

Conclusión

Aunque Excel no permite seleccionar y mostrar varias hojas ocultas al mismo tiempo desde la interfaz estándar, el uso de VBA ofrece una solución rápida y eficiente para hacerlo en pocos pasos. Si necesitas ocultar o mostrar varias hojas regularmente, esta es una herramienta muy útil.

El archivo adjunto tiene un ejemplo.

¡Mis respuestas son voluntarias y sin garantía!

Espero que esto te ayude.

¿Te resultó útil la respuesta? ¡Marca como mejor respuesta y dale Me gusta!

Esto ayudará a todos los participantes del foro.