Kako počistiti celoten list ali določen obseg v Excelu?

Ta članek vam bo pokazal, kako hitro počistite vsebino z ali brez oblikovanja celic celotnega lista ali določenega obsega s kodo VBA v Excelu.

Počistite celoten list s kodo VBA v Excelu
Izbrišite določen obseg s kodo VBA v Excelu

Počistite celoten list s kodo VBA v Excelu

Spodnje kode VBA vam pomagajo počistiti celoten list z ali brez oblikovanja celic.

1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduliin nato v modul kopirajte spodnjo kodo VBA.

Če želite samo počistiti vsebino celice, vendar obdržati oblikovanje, poskusite to kodo.

Koda VBA: počistite celoten list brez oblikovanja celic

Sub sbClearEntireSheetOnlyData()
Sheets("Sheet4").Cells.ClearContents
End Sub

Če želite počistiti vsebino in oblikovanje celic, vam lahko ta koda pomaga.

Koda VBA: Počistite celoten list s formatiranjem celic

Sub sbClearEntireSheet()
Sheets("Sheet4").Cells.Clear
End Sub

Opombe: V kodi je Sheet4 ime delovnega lista, iz katerega boste izbrisali vsebino. Prosimo, spremenite ga, kot potrebujete.

3. Pritisnite F5 tipko ali kliknite gumb Zaženi, da zaženete kodo.

Nato se navedeni delovni list z oblikovanjem celic ali brez njega takoj izbriše.

Izbrišite določen obseg s kodo VBA v Excelu

Za samo brisanje določenega obsega na delovnem listu lahko preizkusite naslednjo kodo VBA.

1. Odprite delovni list, iz katerega boste počistili določen obseg, in pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduliin nato v modul kopirajte spodnjo kodo VBA.

Izbrišite obseg, vendar ohranite oblikovanje, poskusite s to kodo.

Koda VBA: počistite določen obseg brez oblikovanja celic

Sub sbClearCellsOnlyData()
Range("A1:C10").ClearContents
End Sub

Počistite obseg s formatiranjem celic, uporabite to kodo:

Koda VBA: počistite določen obseg s formatiranjem celic

Sub sbClearCells()
Range("A1:C10").Clear
End Sub

Opombe: A1: C10 je obseg, ki ga boste počistili na delovnem listu.

3. Pritisnite F5 ali kliknite Run , da počistite obseg.

Sorodni članki:

• Kako počistiti omejene vrednosti v celicah v Excelu?
• Kako počistiti predpomnilnik filtrov (stare elemente) iz vrtilne tabele v Excelu?