Če iščete rešitev ali posebne trike za izbrišite vsebino območja s programom Excel VBA potem ste pristali na pravem mestu. izbrišite vsebino območja s programom Excel VBA . V tem članku vam bomo prikazali vsak korak z ustreznimi ponazoritvami, tako da jih boste zlahka uporabili za svoj namen. Prepustimo se osrednjemu delu članka.

Prenesi delovni zvezek za prakso

Delovni zvezek za vadbo lahko prenesete tukaj:

Počistite vsebino območja z Excelovim VBA: 3 primeri

Predpostavimo, da imate nabor podatkov, ki ga boste morda želeli ponovno uporabiti za čiščenje obstoječih celic. Tako lahko uporabite kodo VBA za čiščenje vsebine datoteke Excel. V tem razdelku vam bom pokazal hitre in preproste metode za izbrišite vsebino območja s programom Excel VBA v operacijskem sistemu Windows. V tem članku boste našli podrobna pojasnila z jasnimi ilustracijami za vsako stvar. Uporabil sem Različica Microsoft 365 tukaj. Lahko pa uporabite katero koli drugo različico, ki vam je na voljo. Če kar koli v tem članku ne deluje v vaši različici, nam pustite komentar.

Primer 1: Izbriši vse vsebine območja

Za brisanje vsebine določenega območja v trenutnem delovnem listu ali drugih delovnih listih, celo iz drugih delovnih zvezkov, lahko uporabite ukaz Izbriši in ukaz Izbriši. Prikazal vam bom vse primere enega za drugim.

i. Izbrišite vsebino določenega območja celic

Če želite izbrisati vsebino določenega območja, sledite naslednjim korakom:

📌 Koraki:

• Najprej pojdite na zgornji trak in pritisnite na Razvijalec , nato pritisnite na Visual Basic v meniju.
• Uporabite lahko ALT + F11 da odprete "Microsoft Visual Basic za aplikacije" če nimate dodanega zavihka Razvijalec.

• Sedaj se odpre okno z imenom "Microsoft Visual Basic za aplikacije" Tu v zgornji menijski vrstici pritisnite na "Insert" Prikazal se bo meni. V njem izberite "Modul'" možnost.

• Zdaj je na voljo nova "Modul" Prikaže se okno. In Paste to kodo VBA v polje.

Uporaba ukaza Clear:

 Sub Clear_Contents_Range() Range("B4:D5").Clear End Sub 

• Če želite zagnati kodo, pojdite v zgornji meni, pritisnite Spustite in tukaj se odprejo nekatere druge možnosti in izberite . Zaženi pod/UserForm prav tako lahko preprosto pritisnete F5 za zagon kode.

• Uporaba Jasno celice bodo izbrisane, prav tako bo odstranjeno oblikovanje, vendar bodo prazne celice ostale.

Uporaba ukaza za brisanje:

Uporabite lahko tudi Izbriši namesto ukaza Jasno Nato v modul prilepite naslednjo kodo.

 Sub Delete_Contents_Range() Range("B4:D5").Delete End Sub 

Z uporabo ukaza Izbriši, ko zaženete kodo, bo izbrano območje celic odstranjen v celoti.

Preberite več: Excel VBA: Izbriši vsebino, če celica vsebuje določene vrednosti

Razlika med ukazoma Clear in Delete v programu Excel VBA:

Glavna razlika med Jasno in . Izbriši ukazi v Excel VBA je, da je Izbriši ukaz odstrani v celoti odstrani izbrano območje celic, ukaz Počisti pa odstrani le vrednost celice in oblikovanje, vendar bo prazna celica ostala.

ii. Jasna vsebina celotnega delovnega lista

Če želite počistiti vse celice delovnega lista, uporabite spodnjo kodo. Tukaj počistim vsebino delovnega lista z imenom "1.2". vstavite . ime o delovni list ki jih želite izbrisati, v narekovajih.

 Sub Delete_Contents_Range() Worksheets("1.2").Cells.Clear End Sub 

Uporabite lahko tudi Izbriši za odstranitev vseh uporabljenih celic v delovnem listu. Nato morate uporabiti kodo, ki je navedena spodaj. Samo spremenite ime delovnega lista v narekovajih.

 Sub Delete_Contents_Range() Worksheets("1.2").Cells.Delete End Sub 

iii. Počisti vsebino aktivnega delovnega lista

Včasih boste morda morali izbrisati vsebino samo aktivnega delovnega lista. V tem primeru morate uporabiti preprosto kodo, ki je navedena spodaj:

 Sub Delete_Contents_Range() ActiveSheet.Cells.Clear End Sub 

Za popolno odstranitev celic iz aktivnega delovnega lista lahko uporabite tudi ukaz za brisanje. v ta namen v modul vstavite naslednjo kodo.

Podizdelek Delete_Contents_Range()

ActiveSheet.Cells.Delete

Končni podnaslov

Preberite več: Razlika med Delete in Clear Contents v Excelu

Primer 2: Izbrišite vsebino območja, pri čemer ohranite oblikovanje

V prejšnjih metodah ste opazili, da odstranjujete vrednosti celic tudi skupaj z oblikovanjem celic. Torej, če želite odstranite samo vrednosti celic, pri čemer ohranite oblikovanje. enako.

i. Vsebina posebnega območja

Uporabite lahko ClearContents ukaz v Excel VBA za brisanje vsebine določenega območja. V ta namen v modul vstavite naslednjo kodo.

 Sub Delete_cell_Keeping_format() Razpon("B2:D4").ClearContents End Sub 

Ko zaženete kodo, boste videli, da so izbrane celice izbrisane, formati pa še vedno ostanejo.

Preberite več: Kako počistiti celice z določeno vrednostjo v Excelu (2 načina)

ii. Vsebina posebnega delovnega lista

Če želite izbrisati vsebino določenega delovnega lista, pri čemer formati ostanejo enaki, morate uporabiti naslednjo kodo:

 Sub Delete_Worksheet_Cells_Keeping_format() Worksheets("2.2").Range("B2:D4").ClearContents End Sub 

🔎 Razlaga kode VBA:

• Delovni listi("2.2") kliče delovni list z imenom "2.2", če želite poklicati delovni list s katerim koli drugim imenom, vstavite ime delovnega lista v narekovaje.
• In, Razpon ("B2: D4") je določitev območja celic, ki bodo izbrisane. Območje celic lahko urejate po svojih potrebah.

iii. Vsebina iz drugega delovnega zvezka

Prav tako lahko jasno . vsebina na spletnem mestu drug delovni zvezek uporaba VBA kodo. Vendar morate za to ohranite . ta delovni zvezek odprti Za to uporabite naslednjo kodo:

 Sub Delete_Other_Workbook_Cells_Keeping_format() Delovne knjige("datoteka 1").Delovni listi("List1").Razpon("B3:D12").ClearContents End Sub 

🔎 Razlaga kode VBA:

• Delovni zvezki("datoteka 1") kliče delovni zvezek z imenom "Datoteka 1". Pri uporabi delovnih zvezkov morate ime delovnega zvezka vstaviti v narekovaje.
• Delovni listi("List1") kliče delovni list z imenom "List 1". Če želite poklicati katerikoli drug delovni list, vstavite ime delovnega lista namesto "List 1" v tej kodi.
• In, Razpon ("B3: D13") je določitev območja celic, ki bodo izbrisane. Območje celic lahko urejate po svojih potrebah.

Preberite več: Kako izbrisati vsebino brez brisanja formul z uporabo VBA v Excelu

Primer 3: Izbriši vsebino določenega območja vseh delovnih listov naenkrat

Če morate jasno . vsebina določenega razpona več delovnih listov lahko to storite naenkrat z uporabo VBA kodo. Za to nalogo morate uporabiti zanko For. Paste to kodo v modul, da izbrišete vsebino območja B2:D4 vseh delovnih listov. Če želite spremeniti obseg celic, uredite 4. vrstica in vstavite podatkovno območje.

 Sub Clear_Specific_Range_All_Worksheets() Dim W_S As Worksheet For Each W_S In ActiveWorkbook.Worksheets W_S.Range("B2:D4").ClearContents Next W_S End Sub 

Stvari, ki si jih je treba zapomniti

• Uporaba Jasno izbriše le vrednosti in formate celic.
• Izbriši ukaz bo popolnoma odstranil celice.
• ClearContents izbriše samo vrednosti celic, oblike celic pa ostanejo nedotaknjene.

Zaključek

V tem članku ste našli, kako izbrišite vsebino območja s programom Excel VBA . Upam, da vam je bil ta članek v pomoč. Obiščete lahko našo spletno stran ExcelWIKI Če želite izvedeti več vsebin, povezanih z Excelom, v spodnjem razdelku za komentarje napišite pripombe, predloge ali poizvedbe, če jih imate.