Tato metoda zavede makro VBA pro snadné vyhledání listu v aktivním sešitu.

1. zmáčkni Další + F11 současně otevřete okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula poté vložte následující kód VBA do nového otevíracího okna modulu.

VBA: Hledání podle názvu listu

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3. zmáčkni F5 klíč nebo klikněte na Běh tlačítko pro spuštění tohoto VBA.

4. Zobrazí se dialogové okno Hledání listu, zadejte název listu, který budete hledat, a klikněte na OK knoflík. Viz screenshot:

Objeví se další dialogové okno s informací, zda byl list nalezen nebo ne. Jen to zavři.

Poznámka: Tento VBA vyžaduje přesně shodný název listu. Pouze vy zadáte přesně celý název listu, můžete tento list zjistit pomocí tohoto VBA.

Výše uvedený VBA nemusí být snadné zjistit list, pokud si nemůžete přesně pamatovat a zadat název listu. Tato metoda představí program Kutools pro Excel Vytvořte seznam názvů listů nástroj pro snadné vyhledávání a přesun na list.

1, klikněte Kutools Plus > Pracovní list > Vytvořte seznam názvů listů otevřete dialogové okno Vytvořit seznam názvů listů. Zobrazit snímky obrazovky:

2. V úvodním dialogovém okně Vytvořit seznam názvů listů upřesněte nastavení: (1) zkontrolovat Obsahuje seznam hypertextových odkazů volba; (2) zadejte název nově vytvořeného indexového listu; (3) určit místo nového indexového listu; a (4) seznam všech názvů listů v jednom sloupci v rejstříku.

3, Klepněte na tlačítko Ok knoflík. Nyní je vytvořen nový indexový list a umístěn před všechny listy.

4. Přejděte na rejstřík a stiskněte Ctrl + F současně otevřete dialogové okno Najít a nahradit, zadejte klíčové slovo do Najít to, co a klepněte na tlačítko Najít vše knoflík. Viz screenshot:

Nyní jsou všechny názvy listů obsahující klíčová slova nalezeny a uvedeny v dolní části dialogového okna Najít a nahradit. Viz výše uvedené dialogové okno.

5. Kliknutím na nalezený název listu v dialogovém okně Najít a nahradit vyberte odpovídající buňku, poté klikněte na vybranou buňku v indexovém listu, přeskočí najednou na odpovídající list.

Ukázka: vyhledávání podle názvu listu v aplikaci Excel

Pokud máte nainstalovaný program Kutools pro Excel, můžete v navigačním podokně snadno vyhledávat listy podle názvu listu. Postupujte prosím následovně:

1. Ve výchozím nastavení se otevírá navigační podokno. Pokud je zavřeno, klikněte prosím Kutools > Navigační podokno zobrazte navigační podokno a poté klikněte na  (Sešit a list) na levé straně navigačního podokna.

2. Pokračujte a zkontrolujte Filtr zaškrtávací políčko v navigačním podokně a zadejte zadaná klíčová slova do následujícího pole. Nyní budou nalezeny všechny pracovní listy, jejichž jména obsahují zadaná klíčová slova, a jsou uvedeny v níže uvedeném poli. Viz screenshot:

Poznámka: Kliknutím na výsledky vyhledávání skočíte a otevřete příslušný list najednou.

Ukázka: Hledání podle názvu listu pomocí navigačního podokna programu Kutools pro Excel

Vytvořte hypertextový odkaz v buňce na jiný list ve stejném sešitu