Obsah
Tento článek ilustruje 2 vhodné způsoby, jak získat název listu v aplikaci Excel. Název listu je vlastnost názvu objektu Worksheet v aplikaci Excel.
Stáhnout cvičebnici
Stáhněte si tento cvičební sešit a procvičujte si při čtení tohoto článku.
Název listu.xlsm2 metody pro získání názvu listu v aplikaci Excel
K získání názvu listu uloženého v buňce nebo zobrazeného v okně MsgBox můžeme použít vzorce z běžně používaných funkcí nebo jednoduchý kód VBA.
1. Použití vzorce pro získání názvu listu v aplikaci Excel
Protože aplikace Excel neposkytuje žádné vestavěná funkce pro získání názvu listu musíme napsat funkci v kombinaci s příkazem MID, CELL a Funkce FIND . Podívejme se na to:
=MID(CELL("název souboru",A1),FIND("]",CELL("název souboru",A1))+1,31) Vložte vzorec do libovolné buňky pracovního listu, jehož název chceme získat. V tomto příkladu jsme pojmenovali náš pracovní list " Vzorec " a poté vložte vzorec do buňky C5 .
Jak vzorec funguje
- Na stránkách CELL funkce ve vzorci vrací kompletní cesta, název sešitu a název aktuálního listu Zde je vzorec:
=CELL("název souboru",A1) 
- Výsledek, který jsme zjistili v předchozím kroku, má přiložený na název sešitu na adrese [ ] závorky e. [název listu excel.xlsm] Musíme zjistit, jaká je pozice o pravý držák . Aktuální název pracovního listu začíná okamžitě po na pravý držák ... Takže... VYHLEDAT funkce zjistí pozici pravé závorky pomocí následujícího vzorce a poté je třeba doplnit 1 abyste získali pozice o první řetězec o název pracovního listu .
=FIND("]",CELL("název souboru",A1))+1 
- Nakonec Funkce MID bere tři argumenty -
1. argument: =CELL("název souboru",A1) použité v prvním kroku.
2. argument: =FIND("]",CELL("název souboru",A1))+1 použité ve druhém kroku.
3. argument: 31 což je maximální délka názvu pracovního listu v aplikaci Excel.
Další informace: Jak vyhledat název listu v sešitu aplikace Excel (2 metody)
Alternativní vzorec
Tento vzorec lze použít i alternativně, a to pomocí vzorce Funkce RIGHT místo Funkce MID.
=RIGHT(CELL("název souboru",A1),LEN(CELL("název souboru",A1))-FIND("]",CELL("název souboru",A1))) 
2. Kód VBA pro načtení a zobrazení názvu listu aplikace Excel
2.1 Získání názvu aktivního listu v aplikaci Excel pomocí kódu VBA
Pomocí níže uvedeného jednoduchého kódu získáte název aktivního listu.
Sub SheetName() Range("A1") = ActiveSheet.Name End Sub 2.2 Zjištění názvu listu pomocí indexového čísla
Pomocí následujícího kódu můžeme zjistit. název pracovního listu na základě jejich indexové číslo Pokud existují více pracovních listů v sešitě, je tato metoda užitečná pro snadné a rychlé zjištění názvu listu.
Například jsme v druhý pracovní list s názvem vba1. Pomocí následujícího kódu můžeme zjistit. první list název, který je Formula.
Sub Název listu() Range("C5") = Sheets(1).Name End Sub Pomocí následujícího kódu můžeme zjistit. poslední list název sešitu. V tomto příkladu je název posledního listu VBA 2.
Sub SheetName() Range("C6") = Sheets(Sheets.Count).Name End Sub 
Další informace: Jak vyhledat název listu pomocí VBA v aplikaci Excel (3 příklady)
Poznámky
Můžeme také použít Funkce MsgBox zobrazit výsledek kódu VBA v MsgBox pokud není nutné jej v buňce uchovávat nebo používat.
Závěr
Nyní již víme, jak získat název listu v aplikaci Excel. Doufejme, že vás to povzbudí k jistějšímu používání této funkce. Jakékoli dotazy nebo návrhy nezapomeňte vložit do níže uvedeného pole pro komentáře.
