Hoe dubbelklik ik op een cel om een gespecificeerd werkblad in Excel te openen?
Wilt u snel naar een opgegeven werkblad in een Excel-werkmap navigeren? Dit artikel biedt een VBA-methode om een gespecificeerd werkblad te openen door te dubbelklikken op een bepaalde cel in Excel.
Dubbelklik op een cel om een opgegeven werkblad met VBA-code te openen
Dubbelklik op een cel om een opgegeven werkblad met VBA-code te openen
Ga als volgt te werk om een gespecificeerd werkblad te openen door in Excel op een cel te dubbelklikken.
1. Klik met de rechtermuisknop op de bladtab die de cel bevat die u wilt openen door erop te klikken. En klik dan Bekijk code vanuit het contextmenu. Zie screenshot:
2. In de opening Microsoft Visual Basic voor toepassingen -venster, kopieer dan de volgende VBA-code naar het codevenster.
VBA-code: dubbelklik op de cel om een opgegeven werkblad in Excel te openen
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: In de VBA-code, "A1; Vel2''A12; Vel3''A4; Vel4''A100; Vel5" betekent dat dubbelklikken op cel A1 Blad2 opent, dubbelklikken op A2 zal Blad3 openen..., wijzig ze op basis van uw behoeften.
3. druk de anders + Q toetsen samen om de Microsoft Visual Basic voor toepassingen venster.
Vanaf nu wordt het opgegeven werkblad onmiddellijk geactiveerd als u dubbelklikt op cel A1 in het huidige werkblad.
Gerelateerde artikelen:
- Hoe klik of dubbelklik ik op een cel om een opgegeven gebruikersformulier in Excel te openen?
- Hoe voeg ik een vinkje toe in een cel door te dubbelklikken in Excel?
- Hoe automatisch de huidige datum / tijd in een cel toevoegen / invoeren door te dubbelklikken in Excel?
- Hoe dubbelklikt u op een cel en voegt u 1 toe aan die celwaarde in Excel?
- Hoe een kalender openen wanneer ik op een specifieke cel in Excel klik?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!