Slik sletter du ark i Excel (snarveier + VBA)

Når du jobber med Excel, bruker du mesteparten av tiden din på regnearket (som er området som har alle cellene og alt som skjer der).

Å arbeide effektivt med Excel betyr også at du må jobbe med flere regneark i samme arbeidsbok.

Excel lar deg enkelt legge til flere regneark i arbeidsboken, samtidig kan du enkelt slette disse regnearkene.

I denne Excel -opplæringen vil jeg vise deg hvordan du raskt slett regneark i Excel. Jeg vil dekke flere metoder, for eksempel å bruke hurtigtaster, alternativer på båndet og VBA for å slette ark i Excel.

Merk: I denne opplæringen kommer jeg til å bruke ordene "ark" og "regneark" om hverandre. Men for å fortelle deg forskjellen, vil ark inkludere regneark så vel som diagramark, men siden diagramark ikke er så ofte brukt, når jeg bruker ordet Ark, betrakter det som et regneark.

Slett ark ved å høyreklikke alternativer

Den enkleste måten å slette et regneark i Excel er ved å bruke denne enkle museknikken med to klikk.

Anta at du har et regneark som har tre ark som vist nedenfor, og du vil slette Sheet1.

Nedenfor er trinnene for å gjøre dette:

1. Høyreklikk på arket du vil slette
2. Klikk på slettealternativet
3. Klikk på Slett -knappen i meldingen som vises

Du kan også bruke teknikken ovenfor på ark som ikke engang er det aktive arket. For eksempel, hvis jeg for øyeblikket er på Sheet1 og jeg vil slette Shee3, kan jeg bare høyreklikke på Sheet3 og slette det.

Du kan også bruke samme teknikk til slette flere ark samtidig.

For eksempel, hvis jeg vil slette Sheet2 og Sheet3 på en gang, kan jeg holde kontrolltasten og klikke på Sheet2 og Sheet3 en etter en (mens jeg holder inne kontrolltasten).

Ved å holde kontrolltasten ville Excel tillate meg å velge flere ark på en gang. Når jeg er ferdig med å velge de ønskede arkene, kan jeg forlate kontrollnøkkelen. nå kan jeg høyreklikke på hvilken som helst av de valgte arkfanene, og klikke på slett.

Husk at du ikke kan slette alle regnearkene i en arbeidsbok i Excel. det må alltid være minst ett ark i arbeidsboken. Hvis du prøver å slette alle regnearkene (eller det eneste aktive arket), ser du en melding som forteller deg at du ikke har lov til å gjøre dette

Tastatursnarveier for å slette arbeidsarkene

Det er ikke bare én, men to og en halv hurtigtaster du kan bruke til å slette regneark i Excel.

Jeg sier to og en halv fordi en av snarveiene han bruker musen så vel som tastaturet (og er fremdeles en raskere måte å gjøre det på)

Hybrid tastatursnarvei for å slette ark

Høyreklikk + D

For å slette det eller de valgte regnearkene, høyreklikk og trykk deretter på D-tasten på tastaturet.

Personlig synes jeg dette er mye raskere enn å bare bruke musen til å slette et regneark (som jeg dekket i avsnittet ovenfor)

Vanlig hurtigtast for å slette ark

ALT + H + D + S

Hvis du foretrekker å slippe musen og bare bruke tastaturet, vil snarveien ovenfor slette det aktive arket eller de valgte arkene.

Du må trykke på disse tastene etter hverandre (dvs. den ene etter den andre)

Selv om den kan se ut som en litt lengre hurtigtast, er den like rask som alle andre teknikker som er beskrevet i denne opplæringen når du blir vant til den.

Eldre hurtigtast for å slette regneark

Som alle andre har Excel også en fortid, og den er ikke så pen. Jeg snakker om epoken før båndet.

Av kompatibilitetshensyn tillater Excel fremdeles at noen av de gamle hurtigtastene fungerer i de nyere versjonene. og i mange tilfeller er de tidligere snarveiene kortere og bedre.

Heldigvis er det en eldre hurtigtast som fungerer for å slette regneark i Excel

ALT + E + L

Slette ActiveSheet ved hjelp av VBA

Når det gjelder å slette ett ark eller et par regneark, er det bedre å bruke metodene ovenfor.

Selv om VBA kan automatisere prosessen, kommer den til nytte når du må gjenta oppgaven flere ganger.

Som du vil se, kan du med VBA gjøre mye mer når det gjelder sletting av regneark i Excel.

Så jeg tar deg til mer avanserte brukstilfeller, men før det får vi se hvordan du enkelt sletter det aktive regnearket ved hjelp av VBA.

Nedenfor er VBA -koden som vil slette det aktive arket:

Sub DeleteSheet () ActiveSheet.Delete End Sub

Hvis du bruker det i det umiddelbare vinduet, kan du bare bruke linjen nedenfor:

ActiveSheet.Delete

Når du bruker koden ovenfor til å slette det aktive arket, vil Excel vise deg en melding der du må klikke på slette -knappen for å bekrefte handlingen.

Slette arket uten å vise bekreftelsesmeldingen

Meldingsboksen for bekreftelse er en nyttig funksjon som sørger for at du har en sjanse til å avbryte slettingen av arket i tilfelle du har kjørt koden ved et uhell/feil

Men hvis du allerede vet hva du gjør, kan det være ganske irriterende å få denne meldingen.

så her er VBA -koden som vil sørge for at arkene blir slettet, men du ser ingen meldingsboks for bekreftelse.

Sub DeleteSheet () Application.DisplayAlerts = Falsk ActiveSheet.Delete Application.DisplayAlerts = True End Sub

I koden ovenfor har jeg angitt egenskapen Application.DisplayAlerts til false, noe som betyr at Excel ikke vil vise deg noen visningsvarsler mens koden kjører.

Det er også veldig viktig å sørge for at du slår den tilbake til sann på slutten av koden for å gjenopprette funksjonaliteten (som du kan se jeg har gjort i koden ovenfor).

Forsiktig: Når du setter Application.DisplayAlerts -egenskapen til false, ville Excel ganske enkelt slette regnearket, og det ville ikke være mulig å gjenopprette det. så jeg råder deg til å ta en sikkerhetskopi før du bruker denne typen kode.

Slette ark etter navn (hvis det eksisterer) ved hjelp av VBA

VBA lar deg automatisere prosessen med å slette et bestemt regneark (på flere regneark) basert på arkenavnet.

For eksempel, hvis du har et regneark med navnet ‘Salg’, kan du bruke koden nedenfor for å slette det:

Sub DeleteSheetByName () Sheets ("Sales"). Slett End Sub

Denne koden vil bare slette arket som har navnet Salg.

Det er nyttig når du har en arbeidsbok med mange ark, og du ikke vil bla gjennom alle regnearkene for å finne den med navnet salg og slette den manuelt.

Med koden ovenfor spiller det ingen rolle hvor mange regneark det er i arbeidsboken, det ville bare slette salgsarket.

Og siden jeg ikke har endret Application.DisplayAlert -egenskapen, vil du se en melding der du må klikke på slette -knappen for å bekrefte varigheten på salgsarket.

Hvis du vil slette flere ark basert på navnet deres, kan du også gjøre det.

For eksempel vil koden nedenfor slette arkene med navnet Salg, Markedsføring, Finans:

Sub DeleteSheetsByName () Sheets ("Sales"). Slett Sheets ("Marketing"). Slett Sheets ("Finance"). Slett End Sub

Slette alle ark unntatt det aktive arket ved hjelp av VBA

Hvis du har en arbeidsbok med flere regneark i den, og du vil slette alle regnearkene bortsett fra det aktive arket, er VBA sannsynligvis en av de bedre metodene for å gjøre dette.

Nedenfor er VBA -koden som ville slette alle arkene bortsett fra det aktive arket i arbeidsboken.

Sub DeleteSheetByName () Dim ws As Worksheet Application.DisplayAlerts = False For each ws In Sheets If ws.Name ActiveSheet.Name Then ws.Delete End If Next ws Application.DisplayAlerts = True End Sub

Vær oppmerksom på at jeg har sagt at Application.DisplayAlerts -egenskapen faller i begynnelsen av koden, siden jeg ikke vil se en melding for hvert ark som blir slettet.

Slett alle ark med en bestemt tekststreng i navnet

Dette er en litt mer avansert brukstilstand for bruk av VBA effektivt når du sletter regneark.

Anta at du har en arbeidsbok med mange forskjellige regneark, og at du vil slette alle regnearkene som har en bestemt tekststreng i dem, så kan du enkelt gjøre det ved hjelp av VBA.

For eksempel, nedenfor har jeg en arbeidsbok der jeg vil slette alle regnearkene som har tekststrengen "Salg" i seg.

Nedenfor er VBA -koden som ville gjøre det:

Sub DeleteSheetByName () Dim ws As Worksheet Application.DisplayAlerts = False For each ws In Sheets If ws.Name Like "*" & "Sales" & "*" Then MsgBox ws.Name ws.Delete End If Next ws Application.DisplayAlerts = True End Sub

Koden ovenfor bruker if-then-setningen for å gå gjennom alle regnearkene i arbeidsboken. Den sjekker navnet på alle disse regnearkene, og hvis navnet inneholder ordet "Salg", blir regnearket slettet.

Hvis du vil endre koden og se etter en annen tekststreng, kan du endre den på den femte linjen i koden ovenfor.

Vær også oppmerksom på at jeg har brukt en stjerne (*), som er et jokertegn, på begge sider av tekststrengen som vi ser etter i regnearknavnet. Dette sikrer at uansett hvor strengen vises i navnet på regnearket, vil den fortsatt bli slettet.

Du kan også endre koden for å sikre at bare de regnearkene slettes der tekststrengen vises i begynnelsen av regnearknavnet.

For eksempel, hvis du vil slette arkene der begrepet salg vises i begynnelsen, bruker du følgende kode på den femte linjen.

If ws.Name Like "*" & "Sales" & "*" Then

Her har jeg brukt jokertegnet først etter tekstdrikken og ikke før den. Dette vil sikre at mens de sjekker navnene på regnearket, vil bare de tilfredsstille kriteriene der begrepet "salg" er i begynnelsen av navnet.

Så dette er noen av metodene du kan bruke når du vil slette ark i Excel. I de fleste tilfeller kan du enkelt gjøre dette rett i regnearket ved å bruke musen eller hurtigtasten.

Men hvis du har en tung arbeidsbok med mange regneark og du raskt vil slette bestemte typer ark, kan du også bruke VBA.

Jeg håper du synes denne opplæringen var nyttig.