Kui te otsite lahendust või mõnda erilist trikki, et vahemiku sisu kustutamine Exceli VBAga siis olete maandunud õigesse kohta. On mõned lihtsad sammud, et vahemiku sisu kustutamine Exceli VBA abil . See artikkel näitab teile iga sammu koos nõuetekohaste illustratsioonidega, nii et saate neid hõlpsasti oma eesmärgi saavutamiseks rakendada. Läheme artikli kesksesse ossa.

Lae alla praktiline töövihik

Praktilise töövihiku saate alla laadida siit:

Vahemiku sisu kustutamine Exceli VBAga: 3 juhtumit

Oletame, et teil on andmekogum, mida võite uuesti kasutada olemasolevate lahtrite kustutamiseks. Seega saate kasutada VBA-koodi Exceli faili sisu kustutamiseks. Selles jaotises näitan teile kiireid ja lihtsaid meetodeid, et vahemiku sisu kustutamine Exceli VBAga Windows operatsioonisüsteemis. Selles artiklis leiate üksikasjalikud selgitused koos selgete illustratsioonidega iga asja kohta. Olen kasutanud Microsoft 365 versioon siin. Aga te võite kasutada mis tahes muid versioone vastavalt oma kättesaadavusele. Kui midagi sellest artiklist ei tööta teie versioonis, siis jätke meile kommentaar.

Juhtum 1: Tühjendage kogu vahemiku sisu

Te saate kasutada nii käsku Tühjenda kui ka käsku Kustuta, et tühjendada konkreetse vahemiku sisu praegusel töölehel või teistel töölehtedel isegi teistest töövihikutest ka. Ma näitan teile kõik juhtumid ükshaaval.

i. Tühjendage lahtrite konkreetse vahemiku sisu

Kui soovite konkreetse vahemiku sisu kustutada, siis järgige alljärgnevaid samme:

📌 Sammud:

• Selleks minge kõigepealt ülemisele paelale ja vajutage nupule Arendaja , seejärel vajutage Visual Basic valik menüüst.
• Võite kasutada ALT + F11 avada "Microsoft Visual Basic for Applications" aknas, kui teil ei ole vahekaarti Developer lisatud.

• Nüüd, aken nimega "Microsoft Visual Basic for Applications" ilmub. Siin ülemisest menüüribast vajutage nupule "Sisesta" Ja ilmub menüü. Valige neist menüüst "Moodul" võimalus.

• Nüüd on uus "Moodul" ilmub aken. Ja Paste see VBA-kood kasti.

Clear Command'i kasutamine:

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

• Koodi käivitamiseks minge ülemisse menüüsse, vajutage nupule Käivita valik, ja siin avanevad mõned muud võimalused ja valige . Run Sub/UserForm Samuti võite lihtsalt vajutada F5 koodi käivitamiseks.

• Kasutades Selge käsuga tühjendatakse lahtrid ja eemaldatakse ka vormindus. Kuid tühjad lahtrid jäävad alles.

Kasutades käsku Delete:

Võite kasutada ka Kustuta käsu asemel Selge käsk. Seejärel kleebige moodulisse järgmine kood.

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

Kui kasutate käsku Kustuta, siis koodi käivitamisel on valitud rakkude vahemik eemaldatud täielikult.

Loe edasi: Excel VBA: tühjendage sisu, kui lahter sisaldab konkreetseid väärtusi

Erinevus Exceli VBA käsu "Tühjenda" ja "Kustuta" vahel:

Peamine erinevus Selge ja Kustuta käsud Excel VBA on see, et Kustuta käsk eemaldab valitud lahtrite vahemik täielikult ja käsk Tühjenda eemaldab ainult lahtri väärtuse ja vormingu, kuid tühi lahter jääb alles.

ii. Täieliku töölehe selge sisu

Kui soovite kustutada kõik töölehe lahtrid, siis kasutage alljärgnevat koodi. Siin ma kustutan töölehe sisu nimega "1.2". Te peate sisestada . nimi kohta tööleht mida soovite tühjendada käändsetes komades.

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

Samuti saate kasutada Kustuta käsk, et eemaldada kõik kasutatud lahtrid töölehel. Seejärel tuleb kasutada allpool esitatud koodi. Lihtsalt muutke töölehe nimi ümber jutumärkides.

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

iii. Aktiivse töölehe selge sisu

Mõnikord võib teil olla vaja kustutada ainult aktiivse töölehe sisu. Sellisel juhul tuleb teil kasutada allpool esitatud lihtsat koodi:

 Sub Delete_Contents_Range() ActiveSheet.Cells.Clear End Sub 

Aktiivsest töölehest lahtrite täielikuks eemaldamiseks saate kasutada ka käsku delete. selleks kleebige moodulisse järgmine kood.

Sub Delete_Contents_Range()

ActiveSheet.Cells.Delete

End Sub

Loe edasi: Erinevus Exceli kustutamise ja sisu kustutamise vahel

Juhtum 2: Vahemiku sisu kustutamine, säilitades vorminduse

Eelmistes meetodites olete märganud, et te eemaldate lahtri väärtused ka lahtri vormingu järgi. Seega, kui te soovite eemaldada ainult lahtri väärtused, säilitades samal ajal vormingu sama.

i. Spetsiifilise vahemiku sisu

Võite kasutada ClearContents käsk Excel VBA konkreetse vahemiku sisu kustutamiseks. Selleks kleepige moodulisse järgmine kood.

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

Selle tulemusena näete koodi käivitamisel, et valitud lahtrid on tühjendatud, kuid vormingud on endiselt alles.

Loe edasi: Kuidas kustutada Exceli teatud väärtusega lahtrid (2 võimalust)

ii. Konkreetse töölehe sisu

Kui soovite konkreetse töölehe sisu kustutada, säilitades samal ajal formaadid, peate kasutama järgmist koodi:

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

🔎 VBA koodi selgitus:

• Töölehed("2.2") kutsub töölehte nimega "2.2", kui soovite kutsuda mis tahes muu nimega töölehte, siis sisestage töölehe nimi jutumärkidesse.
• Ja, Range("B2:D4") on tühjendatavate lahtrite vahemiku määramine. Te võite muuta lahtrite vahemikku vastavalt oma vajadusele.

iii. Teise töövihiku sisu

Võite ka selge . sisu aadressilt teine töövihik kasutades VBA kood. Kuid selleks peate te olema hoidke see töövihik avatud Kasutage selleks järgmist koodi:

 Sub Delete_Other_Workbook_Cells_Keeping_format() Workbooks("file 1").Worksheets("Sheet1").Range("B3:D12").ClearContents End Sub 

🔎 VBA koodi selgitus:

• Workbooks("fail 1") kutsub töövihikut nimega "Faili 1". Töövihikute kasutamisel peate lisama töövihiku nime jutumärkidesse.
• Töölehed("Sheet1") kutsub töölehte nimega "Leht 1". Mis tahes muu töölehe kutsumiseks sisestage lihtsalt töölehe nimi asemel "Leht 1" selles koodis.
• Ja, Range("B3:D13") on tühjendatavate lahtrite vahemiku määramine. Te saate lahtrite vahemikku vastavalt vajadusele muuta.

Loe edasi: Kuidas kustutada sisu ilma valemite kustutamiseta, kasutades VBA-d Excelis

Juhtum 3: Kõigi töölehtede konkreetse vahemiku sisu kustutamine korraga

Kui teil on vaja selge . sisu konkreetse vahemiku mitu töölehte saate seda teha korraga, kasutades VBA kood. Selle ülesande täitmiseks tuleb kasutada For loop'i. Paste see kood moodulisse, et tühjendada vahemiku sisu B2:D4 kõigi töölehtede kohta. Kui soovite muuta lahtrite vahemikku, siis redigeerige lahtrite 4. rida ja sisestage oma andmevahemik.

 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 

Asjad, mida meeles pidada

• Kasutades Selge käsk kustutab ainult lahtri väärtused ja vormingud.
• Kustuta käsk eemaldab lahtrid täielikult.
• ClearContents käsk kustutab ainult lahtrite väärtused ja jätab lahtriformaadid muutmata.

Kokkuvõte

Selles artiklis olete leidnud, kuidas vahemiku sisu kustutamine Exceli VBA abil . ma loodan, et see artikkel oli teile kasulik. Võite külastada meie veebisaiti ExcelWIKI et õppida rohkem Exceliga seotud sisu. Kui teil on kommentaare, ettepanekuid või päringuid, siis palun kirjutage need allpool olevasse kommentaaride lahtrisse.