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

¿Cómo abrir una hoja de cálculo seleccionando su nombre en un cuadro combinado de Excel?

AutoraSiluvia Fecha de modificación

Imagine que tiene un cuadro combinado en su libro de Excel con una lista de todos los nombres de las hojas. ¿Desea abrir una hoja de cálculo específica simplemente seleccionando su nombre en ese cuadro? Esta guía le muestra cómo lograrlo mediante código VBA, incluyendo los pasos necesarios para rellenar el cuadro combinado con los nombres de las hojas y activar la funcionalidad deseada.

Una captura de pantalla de un cuadro combinado en Excel que contiene nombres de hojas

Abrir una hoja de cálculo seleccionando su nombre en un cuadro combinado con código VBA


Abrir una hoja de cálculo seleccionando su nombre en un cuadro combinado con código VBA

El siguiente código VBA le permite navegar directamente a una hoja de cálculo específica según la opción seleccionada en el cuadro combinado de Excel. Siga estos sencillos pasos:

Nota: Si el cuadro combinado no muestra ningún nombre de hoja en su hoja de cálculo, siga el consejo que aparece a continuación para añadir rápidamente todos los nombres de hojas a dicho cuadro. Si ya dispone de un cuadro combinado con todos los nombres de hojas, vaya directamente al paso 1.

Consejo: Inserte un botón de comando 1 en su hoja de cálculo, haga clic derecho sobre él y seleccione Ver código en el menú contextual. A continuación, copie y pegue el siguiente código VBA en la ventana de código y pulse las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones. Al hacer clic en el botón de comando insertado, todos los nombres de las hojas del libro de trabajo actual se añadirán automáticamente al ComboBox1.

Código VBA: Añada fácilmente todos los nombres de hojas a un cuadro combinado

Private Sub CommandButton1_Click()
    Me.ComboBox1.Clear
    Dim strWs As String
    Dim i As Integer
    
    For i = 1 To ThisWorkbook.Sheets.Count
        Me.ComboBox1.AddItem Sheets(i).Name
    Next
End Sub

Si ya existe un cuadro combinado con todos los nombres de hojas, siga estos pasos:

1. Active el modo Diseño en la pestaña Programador.

2. Haga clic con el botón derecho en el cuadro combinado que contiene los nombres de las hojas y, a continuación, haga clic en Ver código en el menú contextual.

Una captura de pantalla del menú contextual para acceder al código del cuadro combinado en Excel

3. A continuación, se abrirá la ventana de Microsoft Visual Basic para Aplicaciones; sustituya el código VBA original en la ventana de código por el siguiente código VBA.

Código VBA: Abrir una hoja de cálculo específica mediante el valor seleccionado en el cuadro combinado

Private Sub ComboBox1_Change()
    Dim actWsh As String
    actWsh = ComboBox1.Text
    Worksheets(actWsh).Select
End Sub

Nota: en el código, ComboBox1 es el nombre del cuadro combinado que contiene los nombres de las hojas.

4. Pulse las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones y desactive el modo Diseño en la pestaña Programador.

Ahora, al seleccionar cualquier nombre de hoja de cálculo en el cuadro combinado, se abrirá automáticamente la hoja correspondiente.


Liste fácilmente todos los nombres de hojas de Libro de trabajo actual en Excel:

Utilizar un índice de hojas en su libro le permite gestionar sus hojas de cálculo con facilidad. Con la Crear tabla de enlace de Kutools para Excel, puede crear fácilmente un índice que incluya todos los nombres de las hojas del libro de trabajo actual. Después, podrá saltar rápidamente a cualquier hoja haciendo clic directamente en su nombre desde la hoja de índice. Vea la siguiente captura de pantalla:

Una captura de pantalla que muestra un índice de hojas creado con Kutools for Excel

Kutools para Excel: potencie Excel con más de 300 herramientas esenciales, agilice y simplifique su trabajo, y aproveche las funciones de IA para un procesamiento de datos más inteligente y una mayor productividad.Consígalo ahora


Artículos relacionados:

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