Jak zkontrolovat, zda list existuje v sešitu?
Když máte v sešitu desítky listů nebo dokonce stovky listů a chcete najít nebo zkontrolovat, zda list v tomto sešitu existuje, může to být obecně velká práce. Nyní vám představím kód VBA a praktický nástroj pro rychlou kontrolu, zda list v sešitu existuje.
Zkontrolujte, zda existuje list v sešitu s VBA
Zkontrolujte, zda list existuje, a přepněte na něj pomocí Kutools pro Excel
Zkontrolujte, zda list existuje v sešitu
Podle následujících pokynů zkopírujte kód VBA a spusťte jej a zkontrolujte, zda v aktuálním sešitu existuje list.
1. lis Alt + F11 pro zobrazení Microsoft Visual Basic pro aplikace okno.
2. V okně klikněte na Vložit > Modul pro zobrazení nového okna modulu, potom zkopírujte následující kód VBA do okna modulu.
VBA: Zkontrolujte, zda v sešitu existuje list.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function
3. Uložte tento kód a vraťte se na list a vyberte prázdnou buňku a zadejte tento vzorec = CheckSheet („Shee1“) (List1 označuje název listu, který chcete zkontrolovat, zda existuje), stiskněte vstoupit tlačítko, NEPRAVDIVÉ označuje, že tento list neexistuje, a TURU označuje, že v aktuálním sešitu existuje.
Zkontrolujte, zda list existuje, a přepněte na něj pomocí Kutools pro Excel s VBA
S výše definovanou funkcí můžete jednoduše zkontrolovat, zda list existuje a což je také trochu obtížné. Nicméně s Kutools pro ExcelV navigačním podokně najdete seznam všech listů, který podporuje vyhledání listu, nebo filtrování názvu listu, abyste list našli, a pokud potřebujete, můžete kliknutím na název listu po nalezení rychle přepnout na list.
Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. |
Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:
1. povolte sešit, ve kterém chcete zkontrolovat název listu, pokud existuje, a poté klepněte na Kutools > Navigace. Viz snímek obrazovky
:
2. Potom v rozevíracím podokně klikněte na Sešit a list Tlačítko pro rozbalení podokna, v podokně můžete zobrazit seznam všech názvů listů, posouváním vyhledejte názvy listů.
3. Nebo můžete zkontrolovat Filtr Klepněte na tlačítko, zadejte klíčová slova názvu listu, který chcete zkontrolovat, poté bude zadaný název listu seznam, klepněte na název listu a poté se otočte na list.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a 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 usnadňuje vám 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!