Saklaw na Variable ng VBA | Mga halimbawa ng Variable Range sa Excel VBA

Variable ng Excel VBA sa Saklaw

Ang mga variable ay ang puso at kaluluwa ng anumang mga malalaking proyekto ng VBA dahil ang mga variable ay puso at kaluluwa kung gayon ang uri ng uri ng data na itinalaga namin sa kanila ay isang napakahalagang kadahilanan din. Sa aming maraming naunang artikulo, tinalakay namin maraming beses tungkol sa mga variable at ang kahalagahan ng uri ng data. Ang isang tulad ng variable at uri ng data ay "Range Variable", sa espesyal na nakatuong artikulo na ito ay magbibigay kami ng isang kumpletong gabay sa "Range Variable" sa excel VBA.

Ano ang Variable ng Saklaw sa Excel VBA?

Tulad ng bawat iba pang variable na Saklaw sa VBA, ang variable ay isang variable din ngunit ito ay isang "Variable ng Bagay" na ginagamit namin upang maitakda ang sanggunian ng tukoy na saklaw ng mga cell.

Tulad ng anumang iba pang variable, maaari naming ibigay ang anumang pangalan sa variable ngunit ang uri ng data na itinalaga namin sa kanila ay dapat na isang "Saklaw". Kapag ang uri ng data na nakatalaga sa variable ay nagiging isang "Variable ng Bagay" at hindi katulad ng isa pang variable, hindi namin masisimulan ang paggamit ng variable bago namin itakda ang sanggunian ng mga bagay sa kaso ng mga variable ng object.

Kaya, pagkatapos naming ideklara ang variable kailangan nating gamitin ang "ITAKDA" ang keyword upang maitakda ang sanggunian ng bagay hal. Saklaw na object sa kasong ito.

Ok, ngayon makikita natin ang ilan sa mga halimbawa ng excel na VBA Range Variable na praktikal.

Mga halimbawa ng Variable ng Saklaw sa Excel VBA

Maaari mong i-download ang VBA Variable Range Excel Template na ito - VBA Variable Range Excel Template

Halimbawa ipalagay na nais mong piliin ang saklaw ng mga cell mula A2 hanggang B10 para sa imahe sa ibaba ng screenshot.

Upang mapili ang nabanggit na saklaw ng mga cell sa lahat ng ito habang mayroon kaming RANGE object at sa loob ng saklaw na object, nabanggit namin ang address ng cell sa mga dobleng quote.

Code:

 Sub Range_Variable_Example () Saklaw ("A2: B10") End Sub 

Kapag nabanggit ang hanay ng mga cell gamit ang RANGE object kung inilagay mo ang tuldok makikita namin ang lahat ng mga katangian at pamamaraan na nauugnay sa saklaw na bagay na ito.

Code:

 Sub Range_Variable_Example () Saklaw ("A2: B10"). Wakas Sub 

Dahil kailangan naming piliin ang nabanggit na mga cell na simple piliin ang pamamaraang "Piliin" mula sa listahan ng IntelliSense.

Code:

 Sub Range_Variable_Example () Saklaw ("A2: B10"). Piliin ang End Sub 

Patakbuhin ang code at pipiliin nito ang mga nabanggit na mga cell.

Malinaw ito, hindi ba, ngunit isipin ang senaryo ng paggamit ng parehong saklaw sa mahabang proyekto ng VBA na sabihin nating daang beses, na nagsusulat ng parehong code ng "Saklaw (" A2: A10 ")" Ang 100 beses ay tatagal ng ilang oras ngunit sa halip ay idedeklara namin ang variable at itatalaga ang uri ng data bilang "Saklaw" na object.

Ok, bigyan natin ang iyong sariling pangalan sa isang variable at italaga ang uri ng data bilang "Saklaw".

Maliban sa "Mga variable ng Bagay" maaari nating simulang gamitin ang mga variable sa pamamagitan ng kanilang pangalan ngunit sa kaso ng "Mga variable ng Bagay," kailangan naming itakda ang sanggunian.

Halimbawa, sa kasong ito, ang aming variable (Rng) na bagay ay saklaw kaya kailangan naming itakda ang sanggunian na salitang "Rng" ay tumutukoy. Upang maitakda ang sanggunian kailangan naming gamitin ang keyword na "Itakda".

Ngayon ang variable na "Rng" ay tumutukoy sa saklaw ng mga cell mula A2 hanggang B10, sa halip na magsulat "Saklaw (" A2: B10 "))" sa tuwing maaari lamang nating maisulat ang salita "Rng".

Sa susunod na linya banggitin ang variable na pangalan na "Rng" at maglagay ng isang tuldok upang makita ang mahika.

Tulad ng nakikita mo sa itaas maaari naming makita ang lahat ng mga katangian at pamamaraan ng saklaw na bagay tulad ng naunang isa.

Gawin ang Dynable na Variable

Ngayon alam namin kung paano itakda ang sanggunian sa saklaw ng mga cell, ngunit sa sandaling nabanggit namin ang saklaw ng mga cell na dumidikit lamang sa mga cell na iyon, ang anumang pagdaragdag o pagtanggal ng mga cell ay hindi makakaapekto sa mga cell na iyon.

Kaya, ang paghahanap ng bagong saklaw ng mga cell pagkatapos ng anumang pagdaragdag o pagtanggal ng mga cell ay gumagawa ng variable na likas na likas. Posible ito sa pamamagitan ng paghahanap ng huling ginamit na hilera at haligi.

Upang mahanap ang huling ginamit na hilera at haligi kailangan naming tukuyin ang dalawa pang mga variable.

Code:

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding End Sub 

Ngayon sa ibaba code ay mahahanap ang huling ginamit na hilera at haligi bago namin itakda ang sanggunian sa isang variable na saklaw ng object.

Code:

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Mga Haligi. Bilang). Tapusin (xlToLeft). Column End Sub 

Buksan ngayon ang pahayag na "Itakda" na keyword.

Code:

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Mga Haligi. Bilang). Tapusin (xlToLeft). Itakda ang Column Rng = End Sub 

Hindi tulad ng nakaraang pamamaraan, gumagamit kami ng mga katangian ng VBA CELLS sa oras na ito.

Code:

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Mga Haligi. Bilang). Tapusin (xlToLeft). Itakda ng Column Rng = Mga Cell (1, 1) End Sub 

Nabanggit ko ang Mga Cell (1,1) ibig sabihin, tumutukoy ito sa unang cell sa aktibong sheet ngunit kailangan namin ang sanggunian sa saklaw ng data kaya gamitin ang "RESIZE" na pag-aari at banggitin ang mga huling huling ginamit na hilera at haligi ".

Code:

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Mga Haligi. Bilang). Tapusin (xlToLeft). Itakda ng Column Rng = Mga Cell (1, 1). Baguhin ang Buhay (LR, LC) End Sub 

Ngayon itatakda nito ang pinakabagong sanggunian sa variable object range na "Rng". Susunod, banggitin ang variable na pangalan at gamitin ang pamamaraang "Piliin".

 Sub Range_Variable_Example () Dim Rng As Range Dim LR As Long 'LR = Last Row for Understanding Dim LC As Long' LC = Last Column for Understanding LR = Cells (Rows.Count, 1). End (xlUp) .Row LC = Cells (1, Mga Haligi. Bilang). Tapusin (xlToLeft). Itakda ng Column Rng = Mga Cell (1, 1). Baguhin ang Rehiyon (LR, LC) Rng. Piliin ang Wakas na Sub 

Ngayon ay magdagdag ako ng ilang mga linya sa aking data.

Nagdagdag ako ng tatlong labis na mga linya ng data kung pinatakbo ko ang code ngayon dapat itong pumili ng pinakabagong saklaw ng data.

Bagay na dapat alalahanin

  • Ang variable variable sa excel VBA ay isang variable ng object.
  • Sa tuwing gagamitin namin ang variable ng bagay kailangan naming gamitin ang keyword na "Itakda" at itakda ang sanggunian ng object sa variable.
  • Nang walang pagtatakda ng sanggunian hindi kami maaaring gumamit ng variable ng object.