Mostrar y ocultar las hojas deseadas con botones en Excel

Compatibilidad: Excel 365 2021 2019 2016

Podemos interactuar automáticamente mediante un panel para mostrar y ocultar las hojas deseadas con botones en Excel.

Mostrar y ocultar las hojas deseadas con botones en Excel
  • CREAR MACRO
  1. Con Excel abierto.

  2. Pulsar la tecla Alt y mantener pulsada / Pulsar la tecla F11. Mostrará el editor de Visual Basic.

  3. Ir a: Barra de Menú / Insertar / Módulo. Mostrará la ventana del módulo donde escribimos la macro.

    Explorador de Proyectos con módulo1 seleccionado
  4. Escribir el código de la macro:

Sub Enero()

Sheets("Indice").Visible = True

Sheets("Enero").Visible = True
Sheets("Enero").Select
Range("A1").Select

Sheets("Febrero").Visible = False
Sheets("Marzo").Visible = False
Sheets("Abril").Visible = False
Sheets("Mayo").Visible = False
Sheets("Junio").Visible = False

End Sub

- Visible = True. Muestra la hoja.
- Visible = False. Oculta la hoja.

Sub Febrero()

Sheets("Indice").Visible = True
Sheets("Enero").Visible = False

Sheets("Febrero").Visible = True
Sheets("Febrero").Select
Range("A1").Select

Sheets("Marzo").Visible = False
Sheets("Abril").Visible = False
Sheets("Mayo").Visible = False
Sheets("Junio").Visible = False

End Sub

Sub Marzo()

Sheets("Indice").Visible = True
Sheets("Enero").Visible = False
Sheets("Febrero").Visible = False

Sheets("Marzo").Visible = True
Sheets("Marzo").Select
Range("A1").Select

Sheets("Abril").Visible = False
Sheets("Mayo").Visible = False
Sheets("Junio").Visible = False

End Sub

Sub Abril()

Sheets("Indice").Visible = True
Sheets("Enero").Visible = False
Sheets("Febrero").Visible = False
Sheets("Marzo").Visible = False

Sheets("Abril").Visible = True
Sheets("Abril").Select
Range("A1").Select

Sheets("Mayo").Visible = False
Sheets("Junio").Visible = False

End Sub

Sub Mayo()

Sheets("Indice").Visible = True
Sheets("Enero").Visible = False
Sheets("Febrero").Visible = False
Sheets("Marzo").Visible = False
Sheets("Abril").Visible = False

Sheets("Mayo").Visible = True
Sheets("Mayo").Select
Range("A1").Select

Sheets("Junio").Visible = False

End Sub

Sub Junio()

Sheets("Indice").Visible = True
Sheets("Enero").Visible = False
Sheets("Febrero").Visible = False
Sheets("Marzo").Visible = False
Sheets("Abril").Visible = False
Sheets("Mayo").Visible = False

Sheets("Junio").Visible = True
Sheets("Junio").Select
Range("A1").Select

End Sub

  • HOJA INDICE
  1. Ir a: Hoja Indice.

  2. Mostrar la pestaña de desarrollador en la cinta de opciones (ver proceso).

  3. Ir a: Cinta de opciones / Pestaña: Desarrollador / Grupo: Controles / Insertar / Controles de formulario: Botón / Clic sobre la hoja Excel. Mostrará la ventana asignar macro.

    Ventana asignar macro Excel
  4. Pulsar sobre la macro ENERO / Pulsar el botón Aceptar. Cierra la ventana e inserta el botón con la macro.

  5. Situar el cursor sobre el botón / Pulsar botón derecho del ratón / Modificar texto / Escribir: Enero. Como el texto para mostrar la hoja Enero.

    Hoja Excel con botón Enero
  6. Repetir el proceso para insertar los botones para cada macro.

    Hoja Excel con los 6 botones con macro asignada
  7. Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.

  8. En la hoja INDICE al pulsar sobre el mes deseado mostrará la hoja y ocultará el resto.

Proceso de cambio de hojas desde la hoja índice
Nivel de dificultad: Experto VBA-Macros Excel Experto VBA - Macros

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.