¿Cómo hacer doble clic en una celda para abrir una hoja de trabajo específica en Excel?
¿Desea navegar rápidamente a una hoja de trabajo específica en un libro de Excel? Este artículo proporcionará un método VBA para abrir una hoja de trabajo específica haciendo doble clic en una celda determinada en Excel.
Haga doble clic en una celda para abrir una hoja de trabajo especificada con código VBA
Haga doble clic en una celda para abrir una hoja de trabajo especificada con código VBA
Haga lo siguiente para abrir una hoja de trabajo específica haciendo doble clic en una celda en Excel.
1. Haga clic con el botón derecho en la pestaña de la hoja que contiene la celda que desea abrir la hoja de trabajo haciendo clic en ella. Y luego haga clic en Ver código desde el menú contextual. Ver captura de pantalla:
2. En la apertura Microsoft Visual Basic para aplicaciones ventana, copie el siguiente código VBA en la ventana Código.
Código de VBA: haga doble clic en la celda para abrir una hoja de trabajo específica en Excel
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updated by Extendoffice 20180822
Dim xArray, xAValue As Variant
Dim xFNum As Long
Dim xStr, xStrRg, xStrSheetName As String
xRgArray = Array("A1;Sheet2", "A12;Sheet3", "A4;Sheet4", "A100;Sheet5")
On Error Resume Next
For xFNum = LBound(xRgArray) To UBound(xRgArray)
xStr = ""
xStr = xRgArray(xFNum)
xAValue = ""
xAValue = Split(xStr, ";")
xStrRg = ""
xStrRg = xAValue(0)
xStrSheetName = ""
xStrSheetName = xAValue(1)
If Not Intersect(Target, Range(xStrRg)) Is Nothing Then
Sheets(xStrSheetName).Activate
End If
Next
End Sub
Note: En el código VBA, "A1;Hoja2""A12;Hoja3""A4;Hoja4""A100;Hoja5" significa que al hacer doble clic en la celda A1 se abrirá la Hoja 2, al hacer doble clic en A2 se abrirá la Hoja 3..., cámbielos según sus necesidades.
3. presione el otro + Q llaves juntas para cerrar el Microsoft Visual Basic para aplicaciones ventana.
De ahora en adelante, al hacer doble clic en la celda A1 de la hoja de trabajo actual, la hoja de trabajo especificada se activará inmediatamente.
Artículos relacionados:
- ¿Cómo hacer clic o hacer doble clic en la celda para abrir un formulario de usuario específico en Excel?
- ¿Cómo agregar una marca de verificación en una celda con doble clic en Excel?
- ¿Cómo agregar / ingresar automáticamente la fecha / hora actual en una celda con doble clic en Excel?
- ¿Cómo hacer doble clic en una celda y agregar 1 a ese valor de celda en Excel?
- ¿Cómo abrir un calendario al hacer clic en 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!