Ez az oktatóanyag megtanítja, hogyan törölhet vagy törölhet egy munkalapot a VBA segítségével.
Munkalap törlése
A törlés paranccsal törölhet egy munkalapot.
Munkalap törlése név szerint
| 1 | Táblázatok ("Sheet1"). Törlés |
A munkalap törlése az indexszám alapján
Ez a kód törli a munkafüzet első munkalapját:
| 1 | Lapok (1). Törlés |
Ez a kód törli a munkafüzet utolsó munkalapját:
| 1 | Táblázatok (Sheets.Count). Törlés |
Munkalap törlése kérés nélkül
Amikor megpróbál törölni egy munkalapot, az Excel felkéri a művelet megerősítésére:
A DisplayAlerts kapcsolásával letilthatja ezeket az értesítéseket (riasztásokat):
| 123 | Application.DisplayAlerts = HamisTáblázatok ("Sheet1"). TörlésApplication.DisplayAlerts = Igaz |
Törölje a lapot, ha létezik
Ha egy létező munkalapot próbál törölni, a VBA hibát generál. Az On Error Resume Next paranccsal utasíthatja a VBA -t, hogy töröljön egy lapot, ha létezik, ellenkező esetben ugorjon a következő kódsorra:
| 123 | Hiba esetén Folytassa a következőtTáblázatok ("Sheet1"). TörlésGoTo 0 hiba esetén |
Használhatja RangeExists funkciónkat is annak ellenőrzésére, hogy létezik -e lap, és ha igen, törölje:
| 123 | Ha RangeExists ("Sheet1") AkkorTáblázatok ("Sheet1"). TörlésVége Ha |
Tiszta lap
Ez a kód törli a teljes tartalomlapot, formátumot és minden mást:
| 1 | Táblázatok ("Sheet1"). Cellák. Tiszta |
Tiszta munkalap tartalma
Ez a kód törli a teljes lap tartalmát. A formázást, a megjegyzéseket és minden mást egyedül hagy:
| 1 | Táblázatok ("Sheet1"). Cells.ClearContents |
Clear Sheet UsedRange
A fenti példák törlik a munkalap MINDEN celláját. Nagy lapoknál ez nagyon időigényes lehet. Ha helyette a UsedRange -et használja, a VBA csak azokat a „használt” cellákat törli, amelyek értékeket, formátumokat stb. Tartalmaznak.
| 1 | Táblázatok ("Sheet1"). UsedRange.Clear |
