KutoolsforOffice — Una solución, cinco potentes herramientas.Lograr más con menos esfuerzo.Venta de marzo: 20 % de descuento

¿Cómo ocultar automáticamente hojas de cálculo específicas al abrir un archivo de Excel?

AutorXiaoyang Fecha de modificación

Si necesita ocultar automáticamente ciertas hojas de cálculo específicas al abrir el libro en Excel, ¿cómo podría llevar a cabo esta tarea?

Ocultar una hoja de cálculo específica automáticamente al abrir un libro con código VBA

Ocultar varias hojas de cálculo específicas automáticamente al abrir un libro con código VBA


flecha azul burbuja derecha Ocultar una hoja de cálculo específica automáticamente al abrir un libro con código VBA

Si desea ocultar una hoja de cálculo específica al abrir el libro, puede utilizar el siguiente código VBA.

1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. En el panel izquierdo Explorador de proyectos - VBAProject, haga doble clic en EsteLibro para abrir un módulo en blanco y, a continuación, copie y pegue el siguiente código en el módulo:

Código VBA: Ocultar una hoja específica al abrir un libro:

Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub

copie y pegue el código en el módulo ThisWorkbook

Nota: En el código anterior, Hoja5 es el nombre de la hoja que desea ocultar al abrir. Cámbielo según sus necesidades.

3. A continuación, guarde y cierre esta ventana de código y haga clic en Archivo > Guardar como para guardar este libro en formato de Libro de Excel habilitado para macros. Consulte la captura de pantalla:

guarde el libro en formato Libro de Excel habilitado para macros

4. La próxima vez que abra este libro, haga clic primero en el botón Habilitar contenido y su hoja especificada se ocultará automáticamente.

haga clic en el botón Habilitar contenido para activar el código

una captura de pantalla de kutools for excel ia

Descubra la magia de Excel con KUTOOLS AI

  • Ejecución inteligente: Realice operaciones en celdas, analice datos y cree gráficos con comandos sencillos.
  • fórmulas personalizadas: Cree fórmulas a medida para optimizar sus flujos de trabajo.
  • Programación en VBA: Escriba e implemente código VBA con facilidad.
  • Interpretación de fórmulas: Entienda las fórmulas complejas con facilidad.
  • Traducción de texto: Rompa las barreras del idioma directamente en sus hojas de cálculo.
Potencie sus capacidades en Excel con herramientas impulsadas por inteligencia artificial.Descárguelo ahora¡y experimente una eficiencia como nunca antes!

flecha azul burbuja derecha Ocultar varias hojas de cálculo específicas automáticamente al abrir un libro con código VBA

Si tiene varias hojas de cálculo que deben ocultarse al abrir el libro, aquí tiene otro código que le será de gran ayuda.

1. En primer lugar, incluya en una lista de una hoja de cálculo los nombres de las hojas que desea ocultar al abrir el archivo. A continuación, vaya al cuadro Nombre, asígneles el nombre de celda HojasParaOcultar y pulse la tecla Intro. Consulte la captura de pantalla:

liste los nombres de las hojas que desea ocultar y defina un nombre de rango para ellas

2. A continuación, mantenga pulsadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

3. En el panel izquierdo del Explorador de proyectos - VBAProject, haga doble clic en EsteLibro para abrir un módulo en blanco y, a continuación, copie y pegue el siguiente código en el módulo:

Código VBA: Ocultar varias hojas de cálculo específicas al abrir un libro:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   'Updateby Extendoffice 20161206
    Dim ws As Worksheet
    For Each ws In Worksheets
       ws.Visible = xlSheetVisible
    Next ws
End Sub
Private Sub Workbook_Open()
    Dim ws As Worksheet
        For Each ws In Worksheets
            If WorksheetFunction.CountIf([SheetsToHide], ws.Name) > 0 Then
                ws.Visible = xlSheetHidden
                MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel"
            Else
                ws.Visible = xlSheetVisible
            End If
        Next ws
    Set ws = Nothing
End Sub

copie y pegue el código en el módulo ThisWorkbook

Nota: En el código anterior, HojasParaOcultar es el nombre de celda que ha creado en el paso 1.

4. A continuación, guarde y cierre esta ventana de código y haga clic en Archivo > Guardar como para guardar este libro en formato de Libro de Excel habilitado para macros. A partir de ahora, la próxima vez que abra este libro, las hojas de cálculo especificadas se ocultarán automáticamente.

Las mejores herramientas de productividad para Office

🤖KUTOOLS AI Asistente: Revolucione Análisis de datos basándose en:Ejecución Inteligente   |  Generar código|  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos|  Invocar Funciones mejoradas
Funciones populares:Buscar, resaltar o Marcar duplicados   |  Eliminar filas en blanco   |  Combinar Columnas o celdas sin perder datos   |   Redondeo sin usar fórmulas...
Super BUSCARV:Búsqueda vertical (VLookup) con múltiples criterios  |  Búsqueda vertical (VLookup) con múltiples valores  |   Búsqueda vertical (VLookup) entre varias hojas   |   Coincidencia difusa....
Lista desplegable avanzada:Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple....
Gestor de columnas:Añadir un número específico de columnas|Mover columnas|Alternar el estado de visibilidad de columnas ocultas|Comparar rangos y columnas...
Funciones destacadas:Cuadrícula de enfoque   |  Vista de diseño   |Barra de fórmulas mejorada   | Gestor de libros y hojas   |  Biblioteca de recursos(Texto automático)|  Selector de Fecha   |  Combinar Hojas de Cálculo  |  Cifrar/Descifrar celdas   | Enviar correos electrónicos desde una lista   |  Super Filtro   |   Filtro especial(Filtrar celdas con fuente en negrita/cursiva/tachado...) ...
Principales conjuntos de herramientas 15:12 Herramientasde texto(Agregar texto,Eliminar caracteres específicos, ...)|   50+Tiposde gráfico(Diagrama de Gantt, ...)|   40+ Fórmulas prácticas(Calcular la edad basada en la fecha de nacimiento, ...)|   19 Herramientasde inserción(Insertar Código QR,Insertar imagen desde ruta, ...)|   12 Herramientasde conversión(Convertir a palabras,Conversión de moneda, ...)|   7 Herramientasde combinación y división(Combinar filas avanzado,Dividir celdas, ...)|...y muchas más
Use Kutools en su idioma preferido: compatible con inglés, español, alemán, francés, chino y 40+ más idiomas.¡

Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...


Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
  • ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!

Todos los complementos de Kutools en un solo instalador.

Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.

ExcelWordOutlookTabsPowerPoint
  • Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
  • Un instalador, una licencia— configuración en minutos (compatible con MSI)
  • Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
  • Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
  • La mejor relación calidad-precio— ahorre frente a la compra individual de complementos