Jak vytvořit rozevírací seznam s hypertextovými odkazy na každý list v aplikaci Excel?
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.
Vytvořte rozevírací seznam s hypertextovými odkazy na listy
Vytvořte klikací seznam názvů listů
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).
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:
2. Potom nakreslete Combo Box kamkoli chcete.
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.
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
5. cvaknutí Vývojka > Režim návrhu pro ukončení režimu návrhu.
Nyní jsou všechny listy uvedeny v rozevíracím seznamu a kliknutím na název listu přejdete na 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.
1. cvaknutí Kutools Plus > Pracovní list > Create List of Sheet Names.
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.
3. Klikněte na OK, nyní se názvy listů, na které lze kliknout, zobrazí v novém listu.
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ů
Nejlepší nástroje pro produktivitu v kanceláři
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!