Denne opplæringen lærer deg hvordan du sletter eller sletter et regneark ved hjelp av VBA.
Slett regneark
Bruk slette -kommandoen for å slette et regneark.
Slett regneark etter navn
| 1 | Ark ("Ark1"). Slett |
Slett regneark etter indeksnummer
Denne koden sletter det første regnearket i arbeidsboken:
| 1 | Ark (1). Slett |
Denne koden sletter det siste regnearket i arbeidsboken:
| 1 | Ark (Sheets.Count). Slett |
Slett regneark uten spørsmål
Når du prøver å slette et regneark, ber Excel deg om å bekrefte handlingen:
Du kan deaktivere disse meldingene (varsler) ved å veksle mellom DisplayAlerts:
| 123 | Application.DisplayAlerts = FalskArk ("Ark1"). SlettApplication.DisplayAlerts = True |
Slett ark hvis det eksisterer
Hvis du prøver å slette et regneark som ikke eksisterer, genererer VBA en feil. Med On Error Resume Next kan du be VBA om å slette et ark hvis det eksisterer, ellers hopper du til neste kodelinje:
| 123 | Ved feil Fortsett nesteArk ("Ark1"). SlettVed feil GoTo 0 |
Du kan også bruke vår RangeExists -funksjon for å sjekke om det finnes et ark, og i så fall slette det .:
| 123 | Hvis RangeExists ("Sheet1") DaArk ("Ark1"). SlettSlutt om |
Klar ark
Denne koden sletter et helt innholdsark, formater og alt annet:
| 1 | Ark ("Sheet1"). Cells.Clear |
Tydelig arkinnhold
Denne koden sletter innholdet i et helt ark. Det vil la formatering, kommentarer og alt annet være alene:
| 1 | Ark ("Ark1"). Cells.ClearContents |
Klar ark bruktRange
Eksemplene ovenfor vil slette ALLE celler i et regneark. Dette kan være svært tidkrevende i store ark. Hvis du bruker UsedRange i stedet, vil VBA bare slette de "brukte" cellene som inneholder verdier, formater, etc.
| 1 | Ark ("Ark1"). UsedRange.Clear |
