Tämä opetusohjelma opettaa sinulle, miten voit poistaa tai tyhjentää laskentataulukon VBA: n avulla.
Poista laskentataulukko
Poista laskentataulukko poistokomennolla.
Poista laskentataulukko nimen mukaan
| 1 | Sheets ("Sheet1"). Poista |
Poista laskentataulukko indeksinumeron mukaan
Tämä koodi poistaa työkirjan ensimmäisen laskentataulukon:
| 1 | Arkit (1) Poista |
Tämä koodi poistaa työkirjan viimeisen laskentataulukon:
| 1 | Arkit (Sheets.Count) Poista |
Poista laskentataulukko ilman kehotetta
Kun yrität poistaa laskentataulukon, Excel pyytää sinua vahvistamaan toimintasi:
Voit poistaa nämä kehotukset (hälytykset) käytöstä vaihtamalla DisplayAlerts:
| 123 | Application.DisplayAlerts = VääräSheets ("Sheet1"). PoistaApplication.DisplayAlerts = Totta |
Poista taulukko, jos se on olemassa
Jos yrität poistaa laskentataulukon, jota ei ole, VBA tuottaa virheen. Kun Virhe Jatka seuraavaksi, voit pyytää VBA: ta poistamaan taulukon, jos se on olemassa, muussa tapauksessa siirry seuraavalle koodiriville:
| 123 | Virhe Jatka seuraavaksiSheets ("Sheet1"). PoistaVirhe GoTo 0 |
Voit myös käyttää RangeExists -toimintoamme tarkistaaksesi, onko arkki olemassa, ja jos on, poista se:
| 123 | Jos RangeExists ("Sheet1") SittenSheets ("Sheet1"). PoistaLoppu Jos |
Kirkas arkki
Tämä koodi tyhjentää koko sisällön, muodot ja kaiken muun:
| 1 | Sheets ("Sheet1"). Cells.Clear |
Selkeä arkin sisältö
Tämä koodi tyhjentää koko arkin sisällön. Se jättää muotoilun, kommentit ja kaiken muun rauhaan:
| 1 | Sheets ("Sheet1"). Cells.ClearContents |
Kirkas arkki Käytetty alue
Yllä olevat esimerkit tyhjentävät KAIKKI laskentataulukon solut. Tämä voi viedä paljon aikaa suurissa arkeissa. Jos käytät sen sijaan UsedRangea, VBA tyhjentää vain "käytetyt" solut, jotka sisältävät arvoja, muotoja jne.
| 1 | Sheets ("Sheet1"). UsedRange.Clear |
