Efnisyfirlit
Í þessari grein mun ég sýna þér hvernig þú getur notað UsedRange eiginleikann VBA í Excel. Þú munt læra að nota eiginleikann UsedRange fyrir lokað svið, fyrir dreifð svið, fyrir óvirkt vinnublað og einnig fyrir óvirka vinnubók.
Sækja æfingarvinnubók
Sæktu þessa vinnubók til að æfa þig á meðan þú ert að lesa þessa grein.
Excel VBA UsedRange.xlsm
Kynning á UsedRange eiginleikanum VBA í Excel
Eiginleikinn UsedRange VBA skilar Range hlut. Það skilar bili sem samanstendur af öllum hólfum í vinnublaði sem hefur verið notað, þar á meðal tómri röð í upphafi.
Í VBA kóða, er eiginleikinn UsedRange á að nota ásamt heiti vinnublaðsins. Þannig að algeng setningafræði fyrir notkun UsedRange eignarinnar fyrir virka vinnublaðið er:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
⧭ Athugasemdir:
- Hér Rng er nafnið á Range sem er skilað af eiginleikanum UsedRange . Þú getur notað hvað sem þú vilt.
- Til að nota eiginleikann UsedRange í öðru vinnublaði en því virka skaltu nota nafn vinnublaðsins í staðinn.
Til dæmis, til að nota það í vinnublaði sem heitir Sheet1 skaltu setja inn:
Set Rng = Worksheets("Sheet1").UsedRange
4 Ways til að nota UsedRange eiginleika VBA í Excel
Hér eru 4 algengustuleiðir til að nota UsedRange eignina í VBA .
1. VBA UsedRange eign fyrir lokað svið
Í fyrsta lagi notum við eiginleikann VBA UsedRange fyrir vinnublað með lokað svið.
It' mun skila öllu sviðinu þar með talið tómri línu í upphafi.
Hér höfum við vinnublað sem heitir Sheet1 sem inniheldur lokað svið sem samanstendur af nöfnum, dagsetningum og launum sumir starfsmenn fyrirtækis.
Nú ef þú notar eiginleikann UsedRange á þessu vinnublaði mun það skila bilinu B2:C13 (Þar með talið tóma röð í upphafi).
Ef Sheet1 er virkt geturðu notað:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Eða þú getur notað:
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Úttak :
Við höfum notað Select eiginleikann í Range innan kóðans. Þannig að ef við keyrum kóðann velur hann sviðið B2:D13 af Sheet1 .
Lesa meira: Hvernig á að nota Range Object VBA í Excel (5 eiginleikar)
2. VBA UsedRange eign fyrir dreifð svið
Ef þú ert með dreifð svið í einhverju vinnublaði mun UsedRange eignin skila bili þar á meðal tómu hólfunum á milli.
Nú, í Sheet1 , höfum við heildarlaun, hæstu laun og lægstu laun dreifð á ýmsa staði, frá reit B3 til G3 , svona:
Notaðu nú einhverja af tveimur línum af kóða til að nota eiginleikann UsedRange .
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Eða
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Úttak:
Það skilar öllum hólfum innan bilsins B2:G3 á Sheet1 að meðtöldum auðu reitunum (Þar á meðal tóm röð í upphafi). Þar sem við höfum notað Select eiginleikann Range , mun það velja sviðið B2:G3.
Lesa meira: Endir sviðs með VBA í Excel (með dæmum)
Svipaðar lestur
- Excel VBA afrita svið yfir á annað blað (8 auðveldustu leiðir)
- Lokaðu í gegnum svið fyrir hverja reit með Excel VBA (Ultimate Leiðbeiningar)
- Excel áskrift utan sviðsvilla í VBA (með 5 lausnum)
3. VBA UsedRange eign fyrir óvirkt vinnublað
Ef við viljum nýta eiginleikann UsedRange á óvirku vinnublaði, verður þú að nefna nafn vinnublaðsins í upphafi.
Til dæmis, hér er virka vinnublaðið mitt Sheet1 .
Til að nota UsedRange eignina í Sheet2 verðum við að nota :
Dim Rng As Range
Set Rng = Worksheets("Sheet2").UsedRange
Það' ég mun velja allar notaðar frumur í vinnublaðinu sem kallast Sheet2 .
Lesa meira: VBA til að stilla svið í Excel (7 dæmi)
4.VBA UsedRange eign fyrir óvirka vinnubók
Þú getur jafnvel notað UsedRange eignina fyrir vinnubók sem er ekki virk. Settu bara nafnið á vinnubókinni fyrir framan.
Til dæmis, hér er virka vinnubókin mín Vinnubók1 . Til að nýta eiginleikann UsedRange yfir Sheet1 af Workbook2 verðum við að nota:
Dim Rng As Range
Set Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
Það mun velja notað svið vinnublaðsins Sheet1 af Vinnubók2 .
Lesa meira: VBA fyrir hverja hólf á bilinu í Excel (3 aðferðir)
Hlutur til að muna
Eiginleikinn UsedRange VBA skilar Range hlut. Hér í þessari grein höfum við notað Select eiginleikann Range hlutur til að sýna fram á. En augljóslega geturðu notað hvaða aðra eiginleika sem er á Range eftir hentugleika.
Niðurstaða
Með þessum aðferðum geturðu notað UsedRange eigin í Excel. Hefur þú einhverjar spurningar? Ekki hika við að spyrja okkur.