¿Cómo navegar entre hojas de trabajo usando la lista desplegable en Excel?
Supongamos que tiene un libro de trabajo que contiene varias hojas de trabajo, ahora, necesita crear una lista desplegable o un cuadro combinado que enumere todos los nombres de las hojas y cuando seleccione un nombre de hoja de la lista desplegable, saltará a esa hoja inmediatamente. En este artículo, presentaré cómo navegar entre hojas de trabajo usando una lista desplegable en Excel.
Navegue entre hojas de trabajo usando la lista desplegable en Excel
Navegue entre hojas de trabajo usando la lista desplegable en Excel
Para saltar a cada hoja seleccionada utilizando una lista desplegable, siga los siguientes pasos:
1. Hacer clic Developer > recuadro > Cuadro combinado (control ActiveX), ver captura de pantalla:
2. Luego arrastre el mouse para dibujar un cuadro combinado y luego haga clic con el botón derecho, seleccione Ver código en el menú contextual, vea la captura de pantalla:
3. En el abierto Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código para reemplazar el código original, vea la captura de pantalla:
Código de VBA: navegue entre hojas de trabajo usando la lista desplegable
Private Sub ComboBox1_Change()
'Updateby Extendoffice
If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
Dim xSheet As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.EnableEvents = False
If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
ComboBox1.Clear
For Each xSheet In ThisWorkbook.Sheets
ComboBox1.AddItem xSheet.Name
Next xSheet
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub
4. Luego guarde y cierre esta ventana de código, y luego haga clic en Modo de diseño para desactivar el modo de diseño, ahora, al seleccionar un nombre de hoja del cuadro combinado, irá a esa hoja de una vez, vea la captura de pantalla:
Navegue entre hojas de trabajo utilizando hipervínculos o botones:
Con Kutools for Excel's Crear lista de nombres de hojas utilidad, puede enumerar rápidamente todos los nombres de las hojas de trabajo en una nueva hoja con hipervínculos o botones de macro, luego puede navegar entre ellos según sus necesidades.
Kutools for Excel: con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. ¡Descarga y prueba gratis ahora! |
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!