Kako izbrisati tablice u Excelu (prečaci + VBA)

Prilikom rada s Excelom većinu vremena provodite na radnom listu (to je područje koje ima sve ćelije i sve što se tamo događa).

Učinkovit rad s Excelom također znači da morate raditi s više radnih listova unutar iste radne knjige.

Excel vam omogućuje jednostavno dodavanje više radnih listova u radnu knjigu, istovremeno možete i lako izbrisati te radne listove.

U ovom Excel vodiču pokazat ću vam kako brzo brisanje radnih listova u Excelu. Pokrio bih više metoda, poput korištenja tipkovnih prečaca, opcija na vrpci i VBA za brisanje listova u Excelu.

Napomena: U ovom ću vodiču koristiti riječi "list" i "radni list" naizmjenično. No, da vam kažem razliku, tablice bi uključivale radne listove, kao i listove grafikona, ali budući da se listovi grafikona ne koriste tako često, kad god upotrijebim riječ List, smatram to radnim listom.

Brisanje tablica pomoću opcija desnog klika

Najjednostavniji način brisanja radnog lista u Excelu je pomoću ove jednostavne tehnike miša s dva klika.

Pretpostavimo da imate radni list koji ima tri lista kako je dolje prikazano i želite izbrisati List1.

U nastavku su navedeni koraci za to:

1. Desnom tipkom miša kliknite list koji želite izbrisati
2. Pritisnite opciju brisanja
3. U promptu koji se prikaže kliknite gumb Izbriši

Gornju tehniku ​​možete koristiti i na listovima koji čak nisu ni aktivni list. Na primjer, ako sam trenutno na Sheet1 i želim izbrisati Shee3, tada jednostavno mogu desnom tipkom miša kliknuti Sheet3 i izbrisati ga.

Istu tehniku ​​možete koristiti i za brisanje više listova odjednom.

Na primjer, ako želim izbrisati Sheet2 i Sheet3 odjednom, mogu držati kontrolnu tipku i kliknuti na Sheet2 i Sheet3 jedan po jedan (dok još držim kontrolnu tipku).

Držanjem kontrolne tipke Excel bi mi omogućio odabir više listova odjednom. Kad završim s odabirom željenih listova, mogu ostaviti kontrolni ključ. sada mogu desnom tipkom miša kliknuti bilo koju od odabranih kartica listova i kliknuti na brisanje.

Upamtite da ne možete izbrisati sve radne listove u radnoj knjizi u Excelu. uvijek mora postojati barem jedan list u radnoj bilježnici. ako pokušate izbrisati sve radne listove (ili jedini aktivni list), vidjet ćete upit koji će vam reći da to ne smijete učiniti

Tipkovni prečaci za brisanje radnih listova

Ne postoji jedan nego dva i pol tipkovni prečaci koje možete koristiti za brisanje radnih listova u Excelu.

Kažem dvije i pol jer jedan od prečaca koristi miš, kao i tipkovnicu (i još je brži način za to)

Hibridna tipkovnička prečica za brisanje lista

Desnom tipkom miša kliknite + D

Da biste izbrisali odabrani radni list ili radne listove, desnom tipkom miša kliknite, a zatim pritisnite tipku D na tipkovnici.

Osobno smatram da je ovo puno brže nego samo korištenje miša za brisanje radnog lista (kao što sam opisao u gornjem odjeljku)

Obična tipkovnička prečica za brisanje lista

ALT + H + D + S

Ako biste radije odbacili miš i koristili samo tipkovnicu, gornja tipkovnička prečica izbrisat će aktivni list ili odabrane listove.

Morate pritisnuti ove tipke uzastopno (tj. Jednu za drugom)

Iako može izgledati kao malo dulja tipkovna prečica, kad se naviknete na nju, jednako je brza kao i bilo koja druga tehnika obuhvaćena ovim vodičem

Naslijeđena tipkovnička prečica za brisanje radnih listova

Kao i svi drugi, Excel također ima prošlost i nije tako lijepa. Govorim o eri stila prije vrpci.

Zbog kompatibilnosti, Excel i dalje dopušta nekim od tih starih tipkovnih prečaca rad u novijim verzijama. a u mnogim slučajevima ti su prečaci kraći i bolji.

Srećom, postoji naslijeđena prečica na tipkovnici koja radi za brisanje radnih listova u Excelu

ALT + E + L

Brisanje aktivnog lista pomoću VBA

Što se tiče brisanja jednog lista ili nekoliko radnih listova, bolje je koristiti gore navedene metode.

Iako VBA može automatizirati proces, korisnost dolazi kada morate ponoviti zadatak više puta.

Kao što ćete vidjeti, s VBA -om možete učiniti mnogo više što se tiče brisanja radnih listova u Excelu.

Zato ću vas odvesti u naprednije slučajeve korištenja, no prije toga da vidimo kako jednostavno izbrisati aktivni radni list pomoću VBA.

Ispod je VBA kôd koji će izbrisati aktivni list:

Sub Izbriši tablicu () ActiveSheet.Delete End Sub

Ako ga koristite u neposrednom prozoru, jednostavno možete upotrijebiti donji redak:

ActiveSheet.Delete

Kad upotrijebite gornji kôd za brisanje aktivnog lista, Excel će vam prikazati upit u kojemu morate kliknuti gumb za brisanje da biste potvrdili radnju.

Brisanje lista bez prikazivanja upita za potvrdu

Okvir s porukom upita za potvrdu korisna je značajka koja osigurava da imate priliku otkazati brisanje lista u slučaju da ste slučajno/pogrešno pokrenuli kôd

Ali ako već znate što radite, primanje ovog upita može biti prilično iritantno.

pa evo VBA koda koji bi se pobrinuo za brisanje listova, ali ne vidite okvir s porukom za potvrdu.

Sub DeleteSheet () Application.DisplayAlerts = Netačno ActiveSheet.Delete Application.DisplayAlerts = True End Sub

U gornjem kodu postavio sam svojstvo Application.DisplayAlerts na false, što znači da vam Excel neće prikazivati ​​upozorenja na zaslonu dok je kôd pokrenut.

Također je jako važno da se potrudite da ga vratite na true na kraju koda kako biste vratili funkcionalnost (kao što vidite da sam to učinio u gornjem kodu).

Oprez: Kad postavite svojstvo Application.DisplayAlerts na false, Excel bi jednostavno izbrisao radni list i ne bi ga bilo moguće oporaviti. pa vam savjetujem da napravite sigurnosnu kopiju prije korištenja ove vrste koda.

Brisanje lista prema nazivu (ako postoji) pomoću VBA

VBA vam omogućuje automatiziranje procesa brisanja određenog radnog lista (na više radnih listova) na temelju naziva lista.

Na primjer, ako imate radni list s nazivom "Prodaja", možete ga izbrisati pomoću donjeg koda:

Sub Izbriši tabliceByName () listova ("prodaja"). Izbriši kraj pod

Ovaj bi kôd izbrisao samo list s imenom Prodaja.

Korisno je ako imate radnu knjigu s puno listova i ne želite pregledavati sve radne listove, pronaći onu s imenom prodaja i ručno je izbrisati.

S gornjim kodom, nije važno koliko radnih listova ima u radnoj knjizi, jednostavno bi se izbrisao radni list prodaje.

A budući da nisam promijenio svojstvo Application.DisplayAlert, vidjet ćete upit u kojem morate kliknuti gumb za brisanje da biste potvrdili trajanje prodajnog lista.

U slučaju da želite izbrisati više listova na temelju njihovog naziva, to možete i učiniti.

Na primjer, donji kôd izbrisao bi listove s nazivom Prodaja, Marketing, Financije:

Podizbriši Tablice ("Prodaja"). Izbriši tablice ("Marketing"). Izbriši tablice ("Financije"). Izbriši završnu podv.

Brisanje svih listova osim aktivnog lista pomoću VBA

Ako imate radnu knjigu s više radnih listova i želite izbrisati sve radne listove osim aktivnog lista, VBA je vjerojatno jedna od boljih metoda za to.

Ispod je VBA kôd koji bi izbrisao sve listove osim aktivnog u radnoj knjizi.

Sub DeleteSheetByName () Dim ws As Worksheet Application.DisplayAlerts = False Za svaki ws u tablicama Ako je ws.Naziv ActiveSheet.Name Zatim ws.Delete End If Next ws Application.DisplayAlerts = True End Sub

Imajte na umu da sam rekao da svojstvo Application.DisplayAlerts pada na početak koda jer ne želim vidjeti upit za svaki izbrisani list.

Izbrišite sve listove s određenim nizom teksta u imenu

Ovo je malo napredniji slučaj učinkovite uporabe VBA pri brisanju radnih listova.

Pretpostavimo da imate radnu knjigu s mnogo različitih radnih listova i želite izbrisati sve radne listove koji u sebi imaju određeni tekstualni niz, pa to možete lako učiniti pomoću VBA.

Na primjer, ispod imam radnu knjigu u kojoj želim izbrisati sve radne listove u kojima je tekstualni niz "Prodaja".

Ispod je VBA kôd koji bi to učinio:

Sub DeleteSheetByName () Dim ws As Worksheet Application.DisplayAlerts = False Za svaki ws u tablicama Ako je ws.Name poput "*" & "Prodaja" & "*" Zatim MsgBox ws.Name ws.Delete End If Next ws Application.DisplayAlerts = True End Sub

Gornji kôd koristi naredbu if-then za pregledavanje svih radnih listova u radnoj knjizi. On provjerava naziv svih ovih radnih listova i ako naziv sadrži riječ "Prodaja", tada se taj radni list briše.

Ako želite promijeniti kôd i potražiti bilo koji drugi tekstualni niz, to možete promijeniti u petom retku gornjeg koda.

Također imajte na umu da sam koristio zvjezdicu (*), koja je zamjenski znak, s obje strane tekstualnog niza koji tražimo u nazivu radnog lista. Time se osigurava da će se, bez obzira na to gdje se niz pojavljuje u nazivu radnog lista, ipak izbrisati.

Kôd možete i izmijeniti kako biste bili sigurni da se brišu samo oni radni listovi na kojima se tekstualni niz prikazuje na početku naziva radnog lista.

Na primjer, ako želite izbrisati one listove na kojima se pojam prodaja pojavljuje na početku, upotrijebite sljedeći kôd u petom retku.

Ako se ws.Name sviđa "*" & "Prodaja" & "*" Zatim

Ovdje sam upotrijebio zamjenski znak tek nakon tekstualnog pića, a ne prije njega. To će osigurati da tijekom provjere naziva radnog lista samo oni zadovolje kriterije gdje se izraz "prodaja" nalazi na početku naziva.

Dakle, ovo su neke od metoda koje možete koristiti kada želite izbrisati listove u Excelu. U većini slučajeva to možete učiniti jednostavno unutar radnog lista pomoću miša ili prečice na tipkovnici.

No, u slučaju da imate tešku radnu knjigu s puno radnih listova i želite brzo izbrisati određene vrste listova, tada možete koristiti i VBA.

Nadam se da vam je ovaj vodič bio koristan.