photosdematures.com

Excel VBA Malinaw na Mga Nilalaman

Ang mga malinaw na nilalaman ay isang pamamaraan sa VBA na ginagamit upang tanggalin o alisin ang mga halaga na nakaimbak sa mga cell na ibinigay dito, ginagawa ng pamamaraang ito na walang laman ang saklaw ng cell at ginagamit ito sa saklaw na pag-aari upang ma-access ang tinukoy na saklaw ng cell, ang halimbawang gagamitin ang pamamaraang ito ay ang mga sumusunod saklaw ("A1: B2"). Malinaw na Mga Nilalaman ang pamamaraang ito ay tatanggalin ang mga nilalaman ng mga cell mula A1 hanggang B2.

Sa excel na pagdaragdag ng data at pagtanggal ng data ay isang pangkaraniwang gawain. Minsan tinatanggal namin ang solong halaga ng cell, kung minsan maraming halaga ng mga cell, at kung minsan maaari naming mangailangan na tanggalin din ang buong nilalaman ng worksheet. Sa artikulong ito, ipapakita namin sa iyo kung paano gamitin ang pamamaraang "I-clear ang Mga Nilalaman" sa Excel VBA. Sa VBA marami kaming mga pamamaraan upang magawa ito tulad ng "Malinaw", "Tanggalin", at "I-clear ang Mga Nilalaman".

Ano ang Mga Malinaw na Nilalaman sa Excel VBA?

Bago ko sabihin sa iyo ang tungkol sa Malinaw na Mga Nilalaman sa VBA hayaan mo akong ipakita kung paano namin tatanggalin o i-clear ang data sa tukoy na saklaw.

Halimbawa tingnan ang data sa ibaba.

Ngayon kung nais kong limasin mula sa cell A1 hanggang C3 kailangan muna nating banggitin ang saklaw ng mga cell gamit ang VBA RANGE object.

Code:

Saklaw ("A1: C3")

Matapos banggitin ang saklaw ng mga cell sa pamamagitan ng paggamit ng RANGE object kailangan naming piliin ang pamamaraan na "I-clear" upang i-clear ang pagbanggit ng mga halaga ng cell.

Code:

Saklaw ("A1: C3"). Malinaw

Tatanggalin nito ang mga nabanggit na halaga ng cell.

Code:

 Sub Clear_Example () Saklaw ("A1: C3"). I-clear ang End Sub 

Bukod sa malinaw na pamamaraan, maaari din naming gamitin ang paraan na "TANGGALIN".

Code:

Saklaw ("A1: C3"). Tanggalin

Tatanggalin nito ang mga nabanggit na halaga ng cell tulad ng nagawa ng aming malinaw na pamamaraan.

Kung nais mong tanggalin ang lahat ng data ng cell pagkatapos ay maaari mong gamitin ang pag-aari ng VBA CELLS na may pangalan ng worksheet.

Mga worksheet ("Sheet1"). Mga Cell. Tanggalin

Mga worksheet ("Sheet1"). Mga Cell. Malinaw

Ang parehong mga code sa itaas ay tatanggalin ang buong data ng worksheet na "Sheet1". Tatanggalin nito ang mga halaga ng cell mula mismo sa unang cell hanggang sa huling cell ng worksheet.

Kung nais mong tanggalin ang kasalukuyang mga cell ng sheet pagkatapos ay maaari mong gamitin ang object ng Aktibong Sheet.

ActiveSheet.Cells.Delete o ActiveSheet.Cells.Clear

Pagkakaiba sa Pagitan ng Mga Pamamaraan ng I-clear at Tanggalin

Alam kong dapat na naisip ang katanungang ito sa iyong isipan.

Oo, may pagkakaiba sa pagitan ng dalawang pamamaraang ito.

Kapag ginamit mo ang pamamaraang "Tanggalin" tatanggalin nito ang cell at ang sa ibaba ng cell ay kukuha ng posisyon ng tinanggal na cell.

Para sa isang halimbawa tingnan ang larawan sa ibaba.

Ngayon ay gagamitin ko ang paraan ng tanggalin upang tanggalin ang cell A1.

Code:

 Sub Clear_Example () Saklaw ("A1"). Tanggalin ang End Sub 

Tatakbo ko ang code na ito at tingnan kung ano ang mangyayari.

Tingnan kung ano ang nangyari dito tulad ng sinabi ko noong tinanggal ko ang cell A1 ito ay natanggal ngunit ang cell A2 ay gumagalaw ng isang cell pataas at sinakop ang natanggal na cell. Hahantong ito sa hindi pagtutugma ng data. Kaya mag-ingat habang ginagamit ang paraan ng Tanggalin.

Ngayon para sa parehong data, tatanggalin ko ang pamamaraan.

Code:

 Sub I-clear_Example () Saklaw ("A1"). I-clear ang End Sub 

Ngayon tingnan kung ano ang mangyayari kapag pinatakbo ko ang code na ito.

Ang code na ito ay nabakante lamang sa cell A1 nang hindi binabago ang iba pang mga cell. Mukha itong tamang pamamaraan upang tanggalin lamang ang bahagi ng mga cell ng buong saklaw ng data.

Gumamit ng VBA Malinaw na Mga Pamamaraan ng Mga Nilalaman upang Panatilihin ang Pag-format ng Mga Cell

Kung napagmasdan mo ang nakaraang dalawang pamamaraan, ang dalawang pamamaraan na iyon ay hindi lamang tinanggal o na-clear ang mga ibinigay na cell. Tinanggal din nito ang pag-format ng mga cell na ibinigay namin.

Upang mapanatili ang pag-format ng mga cell hindi namin kailangang gamitin ang alinman sa "Tanggalin" o "I-clear" ngunit kailangan naming gamitin ang pamamaraang "Malinaw na Mga Nilalaman" ng VBA.

Sa sandaling ipasok mo ang hanay ng mga cell sa pamamagitan ng paggamit ng isang bagay na RANGE ipapakita nito ang lahat ng mga katangian at pamamaraan na nauugnay dito.

Maaari naming ma-access ang "Tanggalin", maaari nating ma-access ang "I-clear", at maaari din tayong mga pamamaraan na "ClearContents".

Piliin ang pamamaraang ito.

Code:

 Sub Clear_Example () Saklaw ("A1: C3"). I-clear ang Mga Nilalaman End End 

Ngayon, malilinaw nito ang nilalaman mula sa A1 hanggang C3 cell ngunit magkakaroon kami ng lahat ng umiiral na pag-format tulad nito.

Tulad ng nakikita mo sa larawan sa itaas mayroon kaming kulay ng cell sa VBA, mga hangganan, at bawat pag-format na nauugnay sa mga nabanggit na mga cell.

Katulad nito, maaari nating i-clear ang mga nilalaman ng iba pang mga sheet din.

Mga worksheet ("Sheet1"). Saklaw ("A1: D10"). ClearContents

Malilinaw nito ang mga nilalaman mula sa mga cell A1 hanggang D10 sa sheet na "Sheet1".

Katulad nito, maaari din nating tanggalin ang iba pang bukas na mga cell ng workbook.

Mga Workbook ("Book1.xlsx"). Mga worksheet ("Sheet1"). Saklaw ("A1: D10"). ClearContents

Mag-loop sa pamamagitan ng lahat ng Mga Worksheet at I-clear ang mga Nilalaman ng Tiyak na Saklaw

Ipagpalagay na mayroon kang maraming mga sheet sa iyong workbook at nais mong tanggalin ang hanay ng mga cell mula A1 hanggang C15 sa lahat ng mga sheet na kailangan naming gamitin Para sa Bawat Loop sa VBA upang magawa ito.

Ang code sa ibaba ang gagawa ng trabaho.

Code:

 Sub Clear_All () Dim Ws Bilang Worksheet Para sa bawat Ws Sa ActiveWorkbook. Worksheets Ws.Range ("A1: C15"). ClearContents Next Ws End Sub 

Kung sakali kung nais mong i-clear ang buong data ng worksheet pagkatapos ay kailangan mong gamitin ang code sa ibaba.

Code:

 Sub Clear_All () Dim Ws Bilang Worksheet Para sa bawat Ws Sa ActiveWorkbook. Worksheets Ws.Cells.ClearContents Susunod Ws End Sub 

Maaari mong i-download ang template ng VBA Clear Contents Excel dito - VBA I-clear ang Template ng Mga Nilalaman