Note: The other languages of the website are Google-translated. Back to English

Hur följer jag hyperlänk till doldt ark i Excel?

Till exempel har jag en arbetsbok som innehåller flera kalkylblad, det första huvudarket har hyperlänkar till andra ark, och nu döljer jag alla ark utom det första. I det här fallet finns inte hyperlänkar som länkar till dolda ark. Men hur kan du få dessa hyperlänkar att fungera framgångsrikt? När du klickar på en hyperlänk öppnas det länkade dolda arket på samma gång som följande skärmdump visas:

doc hyperlänk till dolt ark 1

Följ hyperlänken för att öppna doldt ark med VBA-kod

Följ hyperlänken för att öppna doldt ark och sedan dölja det igen med VBA-kod


Följ hyperlänken för att öppna doldt ark med VBA-kod

Följande VBA-kod kan hjälpa dig att öppna det dolda kalkylbladet när du klickar på dess relativa hyperlänk, gör så här:

1. Högerklicka på arkfliken som du vill följa hyperlänken till doldt ark och välj sedan Visa kod från snabbmenyn, i poppade ut Microsoft Visual Basic för applikationer kopiera och klistra in följande kod i den tomma modulen:

VBA-kod: Följ hyperlänk för att öppna doldt ark:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    On Error Resume Next
    If Target.Column = 1 Then
        Sheets(Target.Value).Visible = xlSheetVisible
        Sheets(Target.Value).Select
    End If
    Application.ScreenUpdating = True
End Sub

doc hyperlänk till dolt ark 2

Anmärkningar: I ovanstående kod, numret 1 I detta Om Target.Column = 1 Då skriptet anger kolumnnumret som innehåller hyperlänkar, ändra det efter behov.

2. Spara och stäng sedan detta kodfönster, nu när du klickar på hyperlänken som länkar till det specifika dolda arket, öppnas det dolda arket på en gång.


Följ hyperlänken för att öppna doldt ark och sedan dölja det igen med VBA-kod

Ibland måste du följa hyperlänken för att öppna det dolda arket, och när du går tillbaka till huvudarket vill du att det öppnade arket ska döljas igen. Nedanstående VBA-kod kan göra dig en tjänst:

1. Högerklicka på arkfliken som du vill följa hyperlänken till doldt ark och välj sedan Visa kod från snabbmenyn, i poppade ut Microsoft Visual Basic för applikationer kopiera och klistra in följande kod i den tomma modulen:

VBA-kod: Följ hyperlänk för att öppna doldt ark när du går tillbaka dölj det igen:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
   'Updateby Extendoffice
    Application.ScreenUpdating = False
    Dim strLinkSheet As String
    If InStr(Target.Parent, "!") > 0 Then
        strLinkSheet = Left(Target.Parent, InStr(1, Target.Parent, "!") - 1)
    Else
        strLinkSheet = Target.Parent
    End If
    Sheets(strLinkSheet).Visible = True
    Sheets(strLinkSheet).Select
    Application.ScreenUpdating = True
End Sub

Private Sub Worksheet_Activate()
    On Error Resume Next
    Sheets(ActiveCell.Value2).Visible = False
End Sub

doc hyperlänk till dolt ark 3

2. Spara sedan annonsen för att stänga kodfönstret. När du klickar på hyperlänken öppnas det länkade dolda arket omedelbart, men om du går tillbaka till huvudbladet som innehåller hyperlänkar döljs det öppnade arket automatiskt igen.

Anmärkningar: Avhandlingskoder tillämpas endast på bladnamnen som matchar din hyperlänkstext.


Demo: Följ hyperlänken för att öppna doldt ark med VBA-kod

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (9)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Jag försöker dölja ett ark som har en hyperlänk. Jag skulle vilja kunna klicka på arket gå till hyperlänkarket och klicka sedan tillbaka till arket och stäng det dolda arket. Jag har provat dina instruktioner men det fungerar inte. Inte säker på vad jag gör fel.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har ett ark som är dolt som innehåller en hyperlänk. Jag skulle vilja kunna gå till det dolda arket och ha det nära när jag går tillbaka till originalarket. Jag använde koden men den fungerar inte.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har använt den här koden på två olika ark i min arbetsbok, och i båda fallen fungerar den utmärkt, förutom den första hyperlänken på varje sida. Jag får "Subscript out of range error" och felsökaren pekar på "Sheets(strLinkSheet).Visible = True" direkt efter "end if". Någon mer som ser detta fel? Det finns bara på den första länken på sidan. (mina hyperlänkar finns i kolumn A och börjar på rad 2)
Denna kommentar minimerades av moderatoren på webbplatsen
[quote]Jag har använt den här koden på två olika ark i min arbetsbok, och i båda fallen fungerar den utmärkt, förutom den första hyperlänken på varje sida. Jag får "Subscript out of range error" och felsökaren pekar på "Sheets(strLinkSheet).Visible = True" direkt efter "end if". Någon mer som ser detta fel? Det finns bara på den första länken på sidan. (mina hyperlänkar finns i kolumn A och börjar på rad 2)Av HelzBelz[/quote] Bladnamn kan inte ha utrymme som "Sheet 1". Jag fixade mina arknamn till "Sheet1" och felet slutade.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag använder koden på två olika ark. Det fungerar för en av cirka 40 hyperlänkar på ett ark och det öppnar två av cirka 10 hyperlänkar en sekund, arken på det andra som öppnas gömmer sig igen när jag återvänder till arket. Felet jag får när det inte kommer att öppna ett ark är Run-time error"9": skriptet ligger utanför intervallet och koden det pekar mig på - Sheets(strLinkSheet).Visible = True Alla idéer om vilken ändring som behövs gör att fungerar kod på alla ark? Tack på förhand.
Denna kommentar minimerades av moderatoren på webbplatsen
Min hyperlänk "text" är bara nummer, och det fungerar inte...
Denna kommentar minimerades av moderatoren på webbplatsen
Jag skulle vilja använda den här koden men vill bara att den ska gälla kolumn A. Jag har andra webbadresslänkar i andra celler som orsakar problem när jag kör den här koden.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har skapat många ordböcker och jag vill indexera dem på en sida.

OBS: Min poäng är att jag vill dölja alla ark, arken kommer att länkas med inställning av bild till huvudsidan. Genom att klicka på bilden kommer länkade ark att visas och när jag kommer tillbaka till huvudarket kommer av-gömma arket att döljas igen
Denna kommentar minimerades av moderatoren på webbplatsen
Inte säker på om jag kommer att få ett svar på den här, men när jag klickar på någon av mina hyperlänkar får jag ett "referens är inte giltigt" felmeddelande.
Allt fungerar fortfarande, jag behöver bara klicka på OK för att fortsätta.
Har någon en aning om vad som orsakar detta fel för den här koden?
Tack,
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL