V aplikaci Microsoft Excel můžeme odstranit více listů pomocí různých snadných přístupů. Můžeme použít možnosti z kontextové nabídky nebo z pásu karet aplikace Excel a někdy můžeme také vložit kódy VBA, které splňují naše požadavky. V tomto článku se seznámíte se všemi vhodnými metodami pro odstranění více listů v aplikaci Excel s vhodnými příklady a ilustracemi.

Cvičebnice pro praxi

Stáhněte si následující pracovní sešit a cvičení.

4 snadné způsoby odstranění více listů v aplikaci Excel

1. Odstranění více listů v aplikaci Excel pomocí možnosti na pásu karet

Z Stužka můžeme odstranit více listů.

KROKY:

• Listy, které chceme odstranit, vybereme stisknutím a podržením tlačítka Směna klíč.

• Nyní přejděte na Home a vyberte možnost Odstranit > Odstranit list .

• Otevře se dialogové okno.
• Klikněte na OK .

• Pak vidíme, že vybrané listy jsou odstraněny.

2. Použití možnosti List k odstranění více listů v aplikaci Excel

2.1 Pro sousední pracovní list

Pro odstranění více pracovních listů, které spolu sousedí, musíme postupovat podle níže uvedených kroků.

KROKY:

• Stisknutím a podržením tlačítka Směna a myší vyberte první a poslední list, které chceme odstranit.

• Klikněte pravým tlačítkem myši na tlačítko myši na kartě List a vyberte možnost Odstranit .

• Nakonec jsou listy vymazány.

2.2 Pro nesousedící pracovní list

Můžeme také odstranit nesousedící pracovní listy.

KROKY:

• Vyberte buňky, které chceme odstranit, stisknutím tlačítka Ctrl klíč.

• Nyní na kartě List, Klikněte pravým tlačítkem myši na na myši a vyberte Odstranit .

• Zobrazí se dialogové okno.
• Klikněte na OK a podívejte se na výsledek.

3. Odstranění více pracovních listů pomocí hybridní klávesnice

Odstranění více listů v aplikaci Excel stisknutím klávesnice je jedním z nejjednodušších a nejrychlejších způsobů. Stačí, abychom listy vybrali, Klikněte pravým tlačítkem myši na na kartě List a stiskněte tlačítko D z klávesnice. Listy budou vymazány.

4. Vložení kódů VBA pro odstranění více listů aplikace Excel

4.1 Odstranění všech listů se zachováním aktivního listu

VBA je jednou z nejvhodnějších metod pro odstranění všech listů kromě aktivního listu.

KROKY:

• Na kartě List vyberte aktivní list, Klikněte pravým tlačítkem myši na na myši a vyberte Zobrazit kód .

• Nyní zkopírujte následující kódy a vložte je do modulu VBA.

 Option Explicit Sub deletemultiplesheets() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In Sheets If spreadsheet.Name ActiveSheet.Name Then spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub 

• Stiskněte tlačítko Spustit a uvidíme, že jsou odstraněny všechny listy kromě aktivního.

Další informace: Jak odstranit list aplikace Excel pomocí VBA (10 maker VBA)

4.2 Odstranění listů s určitým textovým řetězcem

Můžeme snadno odstranit všechny listy s určitým textovým řetězcem.

KROKY:

• Vyberte list na kartě List.
• Nyní Klikněte pravým tlačítkem myši na na myši a vyberte Zobrazit kód .

• Pak zkopírujte následující kódy a vložte je do modulu VBA. A klikněte na tlačítko Spustit možnost.

 Option Explicit Sub DeleteSheetWithSameName() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In sheets If spreadsheet.Name Like "*" & "Sales1" & "*" Then MsgBox spreadsheet.Name spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub 

• Zobrazí se dialogové okno pro potvrzení a výběr. OK .

• Nakonec vidíme, že vybrané listy s vybranými textovými řetězci jsou odstraněny.

Závěr

Podle těchto metod můžeme v Excelu snadno odstranit více listů. Je přidán cvičný sešit. Klidně si ho vyzkoušejte. Nebojte se na cokoli zeptat nebo navrhnout nové metody.