See õpetus õpetab teile, kuidas töölehte VBA abil kustutada või kustutada.
Kustuta tööleht
Töölehe kustutamiseks kasutage käsku delete.
Kustuta tööleht nime järgi
| 1 | Arvutustabelid ("Leht1"). Kustuta |
Kustuta tööleht indeksinumbri järgi
See kood kustutab töövihiku esimese töölehe:
| 1 | Lehed (1). Kustuta |
See kood kustutab töövihiku viimase töölehe:
| 1 | Lehed (Sheets.Count). Kustuta |
Kustuta tööleht ilma viipata
Kui proovite töölehte kustutada, palub Excel teil oma toimingu kinnitada.
Need viipad (hoiatused) saate keelata, lülitades DisplayAlerts'i sisse.
| 123 | Application.DisplayAlerts = ValeArvutustabelid ("Leht1"). KustutaApplication.DisplayAlerts = Tõsi |
Kustutage leht, kui see on olemas
Kui proovite kustutada töölehte, mida pole olemas, tekitab VBA tõrke. Kui vea jätkamine on järgmine, võite öelda VBA -le, et kustutab lehe, kui see on olemas, vastasel juhul jätkake järgmise koodireaga:
| 123 | Vea korral Jätka järgmistArvutustabelid ("Leht1"). KustutaViga GoTo 0 |
Võite kasutada ka meie funktsiooni RangeExists, et kontrollida, kas leht on olemas, ja kustutada see:
| 123 | Kui RangeExists ("Sheet1") SiisArvutustabelid ("Leht1"). KustutaLõpp Kui |
Selge leht
See kood kustutab kogu sisulehe, vormingud ja kõik muu:
| 1 | Lehed ("Sheet1"). Lahtrid. Selge |
Lehe sisu selge
See kood kustutab kogu lehe sisu. See jätab vormindamise, kommentaarid ja kõik muu rahule:
| 1 | Lehed ("Sheet1"). Lahtrid. Selge sisu |
Selge leht Kasutatud vahemik
Ülaltoodud näited kustutavad töölehe KÕIK lahtrid. Suurte lehtede puhul võib see olla väga aeganõudev. Kui kasutate selle asemel UsedRange'i, kustutab VBA ainult „kasutatud” lahtrid, mis sisaldavad väärtusi, vorminguid jne.
| 1 | Sheets ("Sheet1"). UsedRange.Clear |
