Přejít k hlavnímu obsahu

Jak vytvořit rozevírací seznam s hypertextovými odkazy na každý list v aplikaci Excel?

Autor: Sun Naposledy změněno: 2024-11-14

Věděli jste, že můžete také vytvořit rozevírací seznam s hypertextovými odkazy na každý list v sešitu? Alternativně, pokud dáváte přednost klikacímu seznamu namísto rozevíracího seznamu, můžete vygenerovat seznam hypertextových odkazů na všechny listy. V této příručce vás provedeme oběma způsoby: vytvořením rozevíracího seznamu s odkazy na listy a vytvořením seznamu názvů listů, na které lze kliknout.
Snímek obrazovky rozevíracího seznamu v Excelu s hypertextovými odkazy na každý list

Vytvořte rozevírací seznam s hypertextovými odkazy na listy

Vytvořte klikací seznam názvů listůdobrý nápad3


Vytvořte rozevírací seznam s hypertextovými odkazy na listy

Chcete-li vytvořit rozevírací seznam v aplikaci Excel, který obsahuje hypertextové odkazy na každý list v sešitu, můžete toho dosáhnout pomocí jednoduchého kódu VBA.

1. cvaknutí Vývojka > Vložit > Rozbalovací seznam (ovládací prvky ActiveX).
Snímek obrazovky ukazující, jak vložit Combo Box do Excelu z karty Vývojář

Poznámka: Pokud se karta Vývojář na pásu karet nezobrazuje, klikněte prosím Soubor > možnosti > Přizpůsobit pás karet, a potom zkontrolujte Vývojka možnost v pravém poli. Viz screenshot:
Snímek obrazovky okna Možnosti aplikace Excel se zaškrtnutou kartou Vývojář

2. Potom nakreslete Combo Box kamkoli chcete.
Snímek obrazovky kreslení Combo Boxu v Excelu pro rozevírací seznam

3. Klikněte pravým tlačítkem na list, který jste právě nakreslili se seznamem, a klikněte Zobrazit kód z kontextové nabídky.
Snímek obrazovky s kliknutím pravým tlačítkem na název listu a výběrem „Zobrazit kód“

4. Zkopírujte a vložte níže uvedený kód do prázdného skriptu a poté jej uložte, abyste se vrátili zpět na list.

VBA: Vytvořte rozevírací seznam s odkazy na listy

 Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
    Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
    Dim I As Long
    Me.ComboBox1.Style = fmStyleDropDownList
    If Me.ComboBox1.ListCount <> Sheets.Count Then
        Me.ComboBox1.Clear
        For I = 1 To ActiveWorkbook.Sheets.Count
            Me.ComboBox1.AddItem Sheets(I).Name
        Next
    End If
    Me.ComboBox1.DropDown
End Sub

Snímek obrazovky zobrazující kód VBA vložený do editoru kódu

5. cvaknutí Vývojka > Režim návrhu pro ukončení režimu návrhu.
Snímek obrazovky s možností „Režim návrhu“ na kartě Vývojář v Excelu

Nyní jsou všechny listy uvedeny v rozevíracím seznamu a kliknutím na název listu přejdete na list.
Snímek obrazovky zobrazující plně funkční rozevírací seznam v aplikaci Excel s hypertextovými odkazy na každý list


Vytvořte klikací seznam názvů listů

Pokud dáváte přednost vytvoření seznamu názvů listů, na které lze kliknout, jak je znázorněno na obrázku níže, můžete použít Kutools for ExcelJe Create List of Sheet Names funkce. Tento nástroj umožňuje generovat seznam hypertextových odkazů na názvy listů nebo seznam tlačítek maker propojených s každým listem.
Snímek obrazovky se seznamem názvů listů vytvořených v Excelu, na které lze kliknout

Kutools for Excel nabízí více než 300 pokročilých funkcí pro zefektivnění složitých úkolů, zvýšení kreativity a efektivity. Itegarujte se schopnostmi AI, Kutools automatizuje úkoly s přesností, čímž usnadňuje správu dat. Podrobné informace o Kutools for Excel...         Zkušební verze zdarma...

1. cvaknutí Kutools Plus > Pracovní list > Create List of Sheet Names.
Snímek obrazovky s možností „Vytvořit seznam názvů listů“ v Kutools nabídka v Excelu

2. V Create List of Sheet Names dialogové okno, postupujte takto:

(1). Šek Contains a list of hyperlinks vytvořte seznam názvů listů, na které lze kliknout, nebo zaškrtněte Contains buttons and macros vytvořit tlačítka, která odkazují na každý list.

(2). Pojmenujte nový list, na který umístíte hypertextové odkazy.

(3). Určete umístění nového listu.

(4). Zadejte, kolik sloupců se zobrazí v odkazech listu.
Snímek obrazovky zobrazující dialog „Vytvořit seznam názvů listů“.

3. Klikněte na OK, nyní se názvy listů, na které lze kliknout, zobrazí v novém listu.
Snímek obrazovky se seznamem názvů listů vytvořených v Excelu, na které lze kliknout

Kutools for Excel - Supercharge Excel s více než 300 základními nástroji. Užijte si trvale bezplatné funkce AI! Get It Now

Demo: Vytvořte klikací seznam názvů listů

Kutools for Excel: Více než 300 užitečných nástrojů na dosah ruky! Užijte si trvale bezplatné funkce AI! Stáhnout nyní!

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  vzývat Kutools Funkce...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více
Použijte Kutools ve vašem preferovaném jazyce – podporuje angličtinu, španělštinu, němčinu, francouzštinu, čínštinu a více než 40 dalších!

Vylepšete si své excelové dovednosti s Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab Přináší do Office rozhraní s kartami a výrazně vám usnadňuje práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!