photosdematures.com

Baguhin ang laki ng Excel VBA

Ang resize ay isang pag-aari na magagamit sa VBA upang baguhin o baguhin ang laki ang saklaw ng mga cell mula sa aktibong cell kung kinakailangan. Halimbawa, ipagpalagay na nasa cell B5 ka, at mula sa cell na ito kung nais mong pumili ng 3 mga hilera at dalawang mga haligi maaari naming baguhin ang laki ng isang saklaw sa pamamagitan ng paggamit ng RESIZE na pag-aari ng VBA.

Syntax ng VBA Baguhin ang Laki ng Pag-aari

Nasa ibaba ang syntax ng pag-aari ng VBA RESIZE.

Una, kailangan nating magbigay mula sa aling mga cell ang kailangan nating baguhin ang laki sa pamamagitan ng paggamit ng Saklaw bagay

Pagkatapos ay gumamit ng excel VBA Baguhin ang laki pag-aari at sa pag-aari na ito, kailangan nating magbigay laki ng row limitahan at laki ng haligi hangganan Batay sa mga ibinigay na numero ng hilera at numero ng haligi ay susuriin ito ng laki.

Mga halimbawa ng paggamit ng Resize sa VBA

Nasa ibaba ang mga halimbawa ng paggamit ng laki sa excel VBA.

Maaari mong i-download ang VBA Resize Excel Template dito - VBA Resize Excel Template

Halimbawa # 1

Ipagpalagay na mayroon kang data mula sa A1 hanggang B14 cell at mula sa A1 cell kung nais mong pumili ng 3 mga hilera pababa at dalawang haligi sa kaliwang saklaw magagawa natin ito sa pamamagitan ng paggamit ng RESIZE na pag-aari sa Excel VBA.

Nasa ibaba ang data na ginagamit namin para sa halimbawang ito.

Kaya, una, kailangan nating ibigay ang unang sanggunian ng cell o panimulang punto sa pamamagitan ng paggamit ng bagay na RANGE, sa halimbawang ito ang panimulang punto ay A1 cell.

Code:

 Sub Baguhin ang laki ng_Example () Saklaw ("A1"). Wakas Sub 

Para sa saklaw na ito, gamitin ang RESIZE ang pag-aari.

Code:

 Sub Baguhin ang laki_Example () Saklaw ("A1"). Baguhin ang laki (End Sub 

Ang unang argumento ng RESIZE ay Laki ng Hilera kaya kailangan naming pumili ng 3 mga hilera ng data at ibigay ang numerong halaga ng 3.

Code:

 Sub Resize_Example () Saklaw ("A1"). Baguhin ang laki (3, End Sub 

Susunod na pagtatalo ay Laki ng Haligi para sa pagpasok nito kung paano mo pipiliin ang mga haligi, maglalagay ako ng 3 haligi.

Code:

 Sub Resize_Example () Saklaw ("A1"). Baguhin ang laki (3,3) End Sub 

Kapag tapos na ang pagbabago ng laki kailangan naming ibigay kung ano ang kailangan nating gawin sa saklaw na ito. Pipili lang ako ng pamamaraang "Piliin" upang magsimula.

Code:

 Sub Resize_Example () Saklaw ("A1"). Baguhin ang laki (3, 3). Piliin ang End Sub 

Patakbuhin ang code at tingnan kung gaano karaming mga hilera at kung gaano karaming mga haligi ang pipiliin nito.

Tulad ng nakikita mo sa itaas mula sa A1 cell napili nito ang tatlong mga hilera pababa at tatlong mga haligi sa kanan.

Halimbawa # 2

Ngayon tingnan ang sa ibaba ng VBA code.

Sa code sa itaas para sa Laki ng Hilera, nag-supply kami blangko na cellat para sa Laki ng Haligi, nag-supply kami 3.

Code:

 Sub Resize_Example () Saklaw ("A1"). Baguhin ang laki (0, 3). Piliin ang End Sub 

Patakbuhin ang code at tingnan kung gaano karaming mga hilera at kung gaano karaming mga haligi ang pipiliin nito.

Tulad ng nakikita mo napili lamang nito ang aktibong hilera ng cell ie 1st row at tatlong mga haligi. Ito ay sapagkat para sa Laki ng Hilera nag-supply kami blangko na cell at para sa Laki ng Haligi, nag-supply kami ng 3, at nang naaayon napili nito ang saklaw ng data.

Ngayon, tingnan ang code sa ibaba.

Code:

 Sub Resize_Example () Saklaw ("A1"). Baguhin ang laki (3). Piliin ang End Sub 

Ang gagawin ng code na ito ay pipiliin lamang ito ng tatlong mga hilera kasama ang aktibong row ng cell ngunit walang dagdag na mga haligi.

Halimbawa # 3

Gumamit ng Baguhin ang laki Upang Pumili ng Hindi Kilalang Mga Saklaw. Ang laki ng laki ay pinakamahusay na magagamit kapag nais mong pumili ng isang hindi kilalang hanay ng mga cell. Halimbawa, tingnan ang larawan sa ibaba ng saklaw ng data.

Mayroon itong data sa lahat ng mga paraan mula sa Column A hanggang Column P at hanggang sa hilera hanggang sa ika-700 na hilera.

Ipagpalagay na alam mo na ang iyong data ay patuloy na magbabago at nais mong piliin ang saklaw ng data bawat ngayon at pagkatapos ay sa pamamagitan ng manu-manong pagbabago ng hilera at numero ng haligi. Gayunpaman, sa pamamagitan ng paggamit ng pag-aari ng VBA RESIZE madali nating magagawa ito.

Tingnan ang code sa ibaba.

Code:

 Sub Resize_Example1 () Dim LR As Long Dim LC As Long Worksheets ("Data ng Pagbebenta"). Piliin ang LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Columns.Count). End (xlToLeft). Mga Column Cells (1, 1). Baguhin ang laki (LR, LC). Piliin ang End Sub 

Una ay idineklara ko ang dalawang variable upang makita ang huling ginamit na hilera (LR) at huling ginamit na haligi (LC).

 Dim LR Bilang Mahabang Dim LC As long 

Dahil ang aming data ay nasa worksheet na pinangalanang "Data ng Pagbebenta" pinipili namin ang worksheet na ito sa pamamagitan ng paggamit ng code sa ibaba.

Mga worksheet ("Data ng Pagbebenta"). Piliin

Ngayon sa ibaba code ay mahahanap ang huling ginamit na hilera at huling ginamit na haligi.

LR = Mga Cell (Rows.Count, 1). Pagtatapos (xlUp). Row

LC = Mga Cell (1, Mga Hanay. Bilang). Pagtatapos (xlToLeft). Column

Ngayon mula sa unang cell, binabago namin ang laki sa saklaw mula sa huling ginamit na hilera hanggang sa huling ginamit na haligi at piliin ang ginamit na pamamaraan. Kaya't hindi mahalaga kung gaano kalaki ang iyong data ay pabagu-bago nitong pipiliin ang data sa pamamagitan ng paghahanap ng huling ginamit na hilera at huling ginamit na haligi.

Bagay na dapat alalahanin

• Ang laki ng laki ng pag-aari sa VBA ay magbabago sa laki ng saklaw mula sa aktibong cell (kasama na rin ang aktibong cell).
• Kailangan lang naming ibigay kung gaano karaming mga hilera at kung ilang mga haligi ang maaaring baguhin ang laki mula sa aktibong cell sa VBA.
• Hindi kami maaaring gumamit ng negatibong numero ng row at haligi para sa RESIZE na pag-aari.