Jak uložit pouze jeden list do sešitu v aplikaci Excel?

Při použití aplikace Excel je snadné uložit pouze jeden list ze sešitu jako nový soubor aplikace Excel. Co když si ale ponecháte pouze jeden list a ostatní listy v sešitu odstraníte? Tento článek vám ukáže, jak uložit pouze jeden list jako nový soubor aplikace Excel a poté odstranit neaktivní listy v aktuálním sešitu.

Uložte pouze jeden list jako nový soubor aplikace Excel pomocí funkce Přesunout nebo Kopírovat
Uložte pouze jeden list do aktuálního sešitu pomocí VBA
Uložte pouze jeden list do aktuálního sešitu jedním kliknutím

Uložte pouze jeden list jako nový soubor aplikace Excel pomocí funkce Přesunout nebo Kopírovat

Projekt Přesunout nebo Kopírovat užitečnost funkce aplikace Excel vám pomůže snadno uložit určitý list jako nový soubor aplikace Excel. Můžete postupovat následovně.

1. Klikněte pravým tlačítkem na záložku listu (list, který musíte uložit jako nový soubor) na panelu záložek listu, poté klikněte Přesunout nebo Kopírovat.

2. V Přesunout nebo Kopírovat v dialogovém okně vyberte (nová kniha) z Zarezervovat rozevírací seznam, zkontrolujte Vytvořte kopii a poté klikněte na OK knoflík. Viz screenshot:

3. Poté se zadaný list přesune do nově vytvořeného sešitu, uložte jej prosím ručně.

Uložte pouze jeden list do aktuálního sešitu pomocí VBA

Pokud chcete odstranit všechny listy a uložit pouze jeden určitý list do aktuálního sešitu, může vám pomoci následující kód VBA.

1. lis Další + F11 současně otevřít Microsoft Visual Basic pro aplikaci okno.

2. V Microsoft Visual Basic pro aplikaci okno, klepněte na tlačítko Vložit > Modul. Poté zkopírujte a vložte pod kód VBA do okna modulu.

Kód VBA: odstranit všechny listy kromě určitého v aktuálním sešitu

Sub DeleteSheets1()
    Dim xWs As Worksheet
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    For Each xWs In Application.ActiveWorkbook.Worksheets
        If xWs.Name <> "test" Then
            xWs.Delete
        End If
    Next
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub

Poznámka: v kódu, “test„Je název listu, který musíme ponechat pouze v aktuálním sešitu. Změňte jej prosím na název svého listu.

3. Stisknutím klávesy F5 spusťte kód. Pak můžete vidět, že jsou odstraněny všechny listy v aktuálních sešitech, ale zadaný. A potom sešit uložte, jak potřebujete.

Uložte pouze jeden list do aktuálního sešitu jedním kliknutím

Projekt Odstranit všechny neaktivní listy užitečnost Kutools pro Excel vám pomůže rychle odstranit všechny pracovní listy kromě aktuálního jediným kliknutím.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1. Posuňte se na list, který chcete ponechat pouze v aktuálním sešitu, a klikněte na Kutools Plus > Pracovní list > Odstranit všechny neaktivní listy. Viz snímek obrazovky:

Poté se zobrazí dialogové okno s výzvou, pokud se rozhodnete je odstranit, klikněte na OK .

Poté jsou všechny neaktivní listy okamžitě odstraněny z aktuálního sešitu.

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.

Uložte pouze jeden list

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

• Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
• Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
• Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
• Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
• Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
• Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
• Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
• Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
• Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.

Čtěte více... Stažení zdarma... Nákup... 

---

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 omezuje stovky kliknutí myší každý den!

Čtěte více... Stažení zdarma... Nákup...