¿Cómo abrir una hoja de trabajo específica por el valor seleccionado de un cuadro combinado en Excel?
Supongamos que tiene un cuadro combinado que contiene todos los nombres de las hojas del libro de trabajo actual, como se muestra a continuación. Y ahora, desea abrir una hoja de trabajo específica al seleccionar el nombre de la hoja correspondiente en un cuadro combinado. ¿Cómo lograrlo? El método de este artículo puede ayudarte.
Abra una hoja de trabajo específica por el valor seleccionado de un cuadro combinado con código VBA
Abra una hoja de trabajo específica por el valor seleccionado de un cuadro combinado con código VBA
El siguiente código VBA puede ayudarlo a ir a una hoja de trabajo específica basada en la selección del Cuadro combinado en Excel. Haz lo siguiente.
Note: Si el cuadro combinado no contiene ningún nombre de hoja en su hoja de trabajo, siga el consejo a continuación para agregar rápidamente todos los nombres de las hojas a ese cuadro combinado. Y si ya hay un cuadro combinado que contiene todos los nombres de las hojas, cambie al paso 1 .
Consejo: Inserte un Botón de comando 1 en su hoja de trabajo, haga clic derecho y seleccione Ver código desde el menú contextual. Luego copie y pegue el siguiente código VBA en el Código ventana y presione el otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana. Haga clic en el Botón de comando insertado, luego todos los nombres de las hojas del libro de trabajo actual se agregarán automáticamente al ComboBox1.
Código VBA: agregue fácilmente todos los nombres de las hojas en 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 que contiene todos los nombres de las hojas, haga lo siguiente.
1. Enciende el Modo de diseño bajo el Developer .
2. Haga clic con el botón derecho en el cuadro combinado con los nombres de las hojas, luego haga clic en Ver código desde el menú contextual.
3. Entonces el Microsoft Visual Basic para aplicaciones aparece la ventana, reemplace el código VBA original en la ventana Código con el siguiente código VBA.
Código de VBA: abra una hoja de trabajo específica por el valor seleccionado del cuadro combinado
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End Sub
Note: en el código, ComboBox1 es el nombre del cuadro combinado que contiene los nombres de las hojas.
4. presione el otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana y apague el Modo de diseño bajo el Developer .
Ahora, al seleccionar cualquier nombre de hoja de trabajo en el cuadro combinado, la hoja de trabajo correspondiente se abrirá automáticamente.
Enumere fácilmente todos los nombres de las hojas del libro de trabajo actual en Excel:
El uso del índice de hojas en su libro de trabajo lo ayuda a administrar sus hojas de trabajo con facilidad. Con el Crear lista de nombres de hojas utilidad de Kutools for Excel, puede crear fácilmente un índice de hoja que contenga todos los nombres de hoja en el libro de trabajo actual. Después de eso, puede cambiar rápidamente a una determinada hoja de trabajo simplemente haciendo clic en el nombre de la hoja en la hoja de trabajo de Índice. Vea la siguiente captura de pantalla:
¡Descárgalo y pruébalo ahora! (Pista gratuita de 30 días)
Artículos relacionados:
- ¿Cómo copiar el valor del cuadro combinado a la celda activa en Excel?
- ¿Cómo mostrar el formato de fecha en la salida del cuadro combinado en Excel?
- ¿Cómo ocultar o mostrar un botón de comando según el valor de celda especificado en Excel?
- ¿Cómo evitar o deshabilitar la escritura en un cuadro combinado en Excel?
- ¿Cómo salir del cuadro combinado para seleccionar una celda específica en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite 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 de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!