Hvordan dobbeltklikker jeg på en celle for at åbne et bestemt regneark i Excel?
Vil du hurtigt navigere til et bestemt regneark i en Excel-projektmappe? Denne artikel giver en VBA-metode til at åbne et bestemt regneark ved at dobbeltklikke på en bestemt celle i Excel.
Dobbeltklik på en celle for at åbne et specificeret regneark med VBA-kode
Dobbeltklik på en celle for at åbne et specificeret regneark med VBA-kode
Gør som følger for at åbne et specificeret regneark ved at dobbeltklikke på en celle i Excel.
1. Højreklik på arkfanen, der indeholder den celle, du vil åbne regnearket ved at klikke på den. Og klik derefter på Vis kode fra genvejsmenuen. Se skærmbillede:
2. I åbningen Microsoft Visual Basic til applikationer vindue, skal du kopiere følgende VBA-kode til kodevinduet.
VBA-kode: dobbeltklik på celle for at åbne et bestemt regneark i 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
Bemærk: I VBA-koden, "A1; Ark2""A12; Ark3""A4; Ark4""A100; Ark5" betyder, at dobbeltklik på celle A1 vil åbne Ark2, dobbeltklik på A2 vil åbne Ark3..., skift dem venligst baseret på dine behov.
3. Tryk på andre + Q tasterne sammen for at lukke Microsoft Visual Basic til applikationer vindue.
Fra nu af, når du dobbeltklikker på celle A1 i det aktuelle regneark, aktiveres det angivne regneark med det samme.
Relaterede artikler:
- Hvordan klik eller dobbeltklik celle for at åbne en bestemt brugerformular i Excel?
- Hvordan tilføjes flueben i en celle med dobbeltklik i Excel?
- Hvordan tilføjes / indtastes den aktuelle dato / tid automatisk i en celle med dobbeltklik i Excel?
- Hvordan dobbeltklikker du på en celle og tilføjer 1 til den celleværdi i Excel?
- Hvordan dukker en kalender op, når du klikker på en bestemt celle i Excel?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!