Turinys
Šiame straipsnyje parodysiu, kaip galite naudoti NaudotasRange savybė VBA Excel programoje. Išmoksite naudoti NaudotasRange savybė uždaram diapazonui, išsklaidytam diapazonui, neaktyviam darbalapiui, taip pat neaktyviam sąsiuviniui.
Atsisiųsti praktikos sąsiuvinį
Atsisiųskite šį pratybų sąsiuvinį ir praktikuokitės skaitydami šį straipsnį.
"Excel" VBA UsedRange.xlsmĮvadas į "Excel" VBA savybę UsedRange
Svetainė NaudotasRange savybė VBA grąžina Diapazonas Jis grąžina diapazoną, sudarytą iš visų naudotų darbalapio ląstelių, įskaitant pradžioje esančią tuščią eilutę.
Į VBA kodą,. NaudotasRange turi būti naudojama kartu su darbalapio pavadinimu. NaudotasRange aktyvaus darbalapio savybė yra:
Dim Rng kaip diapazonas
Set Rng = ActiveSheet.UsedRange
⧭ Pastabos:
- Čia Rng yra pavadinimas Diapazonas grąžinamas pagal NaudotasRange nuosavybė. Galite naudoti bet ką, kas jums patinka.
- Naudotis NaudotasRange savybė yra ne aktyviajame, o kitame darbalapyje, vietoj jos naudokite darbalapio pavadinimą.
Pavyzdžiui, norėdami jį taikyti darbalapyje, pavadintame 1 lapas , įterpti:
Set Rng = Worksheets("Sheet1").UsedRange
4 būdai, kaip "Excel" programoje naudoti VBA savybę UsedRange
Čia yra 4 dažniausiai pasitaikantys būdai naudoti NaudotasRange nuosavybė VBA .
1. VBA UsedRange savybė uždaram diapazonui
Pirmiausia naudosime VBA UsedRange darbo lapo su uždaru diapazonu savybė.
Bus grąžinamas visas diapazonas, įskaitant pradžioje esančią tuščią eilutę.
Čia turime darbalapį, pavadintą 1 lapas kuriame yra uždaras intervalas, sudarytas iš kai kurių įmonės darbuotojų vardų, pavardžių, prisijungimo datų ir atlyginimų.
Dabar, jei naudojate NaudotasRange savybę šiame darbalapyje, bus grąžinamas diapazonas B2:C13 (įskaitant pradžioje esančią tuščią eilutę).
Jei 1 lapas yra aktyvus, galite naudoti:
Dim Rng kaip diapazonas
Set Rng = ActiveSheet.UsedRange
Arba galite naudoti:
Dim Rng kaip diapazonas
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Išvestis:
Naudojome Pasirinkite savybė Diapazonas Taigi, jei paleisime kodą, bus pasirinktas diapazonas B2:D13 iš 1 lapas .
Skaityti daugiau: Kaip "Excel" programoje naudoti VBA objektą "Range Object" (5 savybės)
2. VBA UsedRange savybė, skirta išsklaidytam diapazonui
Jei bet kuriame darbalapyje turite išsklaidytą diapazoną, NaudotasRange savybė grąžins intervalą, įskaitant tarp jų esančius tuščius langelius.
Dabar 1 lapas , turime bendrą atlyginimą, didžiausią ir mažiausią atlyginimą, išsibarsčiusius įvairiose vietose, iš langelio B3 į G3 , kaip šis:
Dabar naudokite bet kurią iš dviejų kodų eilučių, kad galėtumėte naudoti NaudotasRange nuosavybė.
Dim Rng kaip diapazonas
Set Rng = ActiveSheet.UsedRange
Arba
Dim Rng kaip diapazonas
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Išvestis:
Jis grąžina visas ląsteles, esančias intervale B2:G3 iš 1 lapas įskaitant tuščius langelius (įskaitant tuščią eilutę pradžioje). Pasirinkite savybė Diapazonas , bus pasirinktas diapazonas B2:G3.
Skaityti daugiau: Diapazono pabaiga naudojant "Excel" VBA (su pavyzdžiais)
Panašūs skaitiniai
- "Excel VBA" kopijavimas į kitą lapą (8 paprasčiausi būdai)
- "Excel" VBA kilpa per diapazoną kiekvienai ląstelei (galutinis vadovas)
- "Excel" indeksų klaida VBA (su 5 sprendimais)
3. VBA UsedRange savybė neaktyviam darbalapiui
Jei norime pasinaudoti NaudotasRange savybę neaktyviame darbalapyje, pradžioje turite nurodyti darbalapio pavadinimą.
Pavyzdžiui, čia mano aktyvusis darbalapis yra 1 lapas .
Jei norite naudoti NaudotasRange nuosavybė Lapas2 , turime naudoti:
Dim Rng kaip diapazonas
Set Rng = Worksheets("Sheet2").UsedRange
Bus pasirinktos visos naudojamos darbalapio ląstelės, pavadintos Lapas2 .
Skaityti daugiau: VBA diapazono nustatymas "Excel" programoje (7 pavyzdžiai)
4. VBA UsedRange savybė neaktyviam darbaknygiui
Galite naudoti savybę UsedRange net ir neaktyviam sąsiuviniui. Tiesiog priešais įrašykite sąsiuvinio pavadinimą.
Pavyzdžiui, čia mano aktyvioji darbo knyga yra Darbo knyga1 . Naudotis NaudotasRange nuosavybė virš 1 lapas iš Darbo knyga2 , turime naudoti:
Dim Rng kaip diapazonas
Set Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
Bus pasirinktas naudojamas darbalapio diapazonas 1 lapas iš Darbo knyga2 .
Skaityti daugiau: VBA kiekvienam "Excel" diapazono langeliui (3 metodai)
Dalykai, kuriuos reikia prisiminti
Svetainė NaudotasRange savybė VBA grąžina Diapazonas Šiame straipsnyje mes naudojame objektą Pasirinkite savybė Kategorijos objektas Tačiau akivaizdu, kad galite naudoti bet kurią kitą Diapazonas kaip jums patogiau.
Išvada
Naudodami šiuos metodus galite naudoti NaudotasRange nuosavybė "Excel" programoje. Turite klausimų? Nedvejodami kreipkitės į mus.