Denne vejledning lærer dig, hvordan du sletter eller sletter et regneark ved hjælp af VBA.
Slet regneark
Brug kommandoen delete til at slette et regneark.
Slet regneark efter navn
| 1 | Ark ("Ark1"). Slet |
Slet regneark efter indeksnummer
Denne kode sletter det første regneark i projektmappen:
| 1 | Ark (1) .Slet |
Denne kode sletter det sidste regneark i projektmappen:
| 1 | Ark (Sheets.Count) .Slet |
Slet regneark uden prompt
Når du forsøger at slette et regneark, beder Excel dig om at bekræfte din handling:
Du kan deaktivere disse meddelelser (advarsler) ved at skifte DisplayAlerts:
| 123 | Application.DisplayAlerts = FalskArk ("Ark1"). SletApplication.DisplayAlerts = True |
Slet ark, hvis det findes
Hvis du forsøger at slette et regneark, der ikke findes, genererer VBA en fejl. Med On Error Resume Next kan du fortælle VBA at slette et ark, hvis det findes, ellers spring til den næste linje med kode:
| 123 | Ved fejl Genoptag næsteArk ("Ark1"). SletVed fejl GoTo 0 |
Du kan også bruge vores RangeExists -funktion til at kontrollere, om der findes et ark, og i så fald slette det .:
| 123 | Hvis RangeExists ("Sheet1") derefterArk ("Ark1"). SletAfslut Hvis |
Klar ark
Denne kode rydder et helt indholdsark, formater og alt andet:
| 1 | Ark ("Ark1"). Cellerne er klare |
Tydeligt arkindhold
Denne kode rydder et helt ark indhold. Det efterlader formatering, kommentarer og alt andet alene:
| 1 | Ark ("Ark1"). Cells.ClearContents |
Clear Sheet UsedRange
Ovenstående eksempler sletter ALLE celler i et regneark. Dette kan være meget tidskrævende i store ark. Hvis du bruger UsedRange i stedet, sletter VBA kun de "brugte" celler, der indeholder værdier, formater osv.
| 1 | Ark ("Ark1"). UsedRange.Clear |
