Sadržaj
U ovom ću vam članku pokazati kako možete koristiti svojstvo UsedRange VBA u Excelu. Naučit ćete koristiti svojstvo UsedRange za zatvoreni raspon, za raštrkani raspon, za neaktivan radni list i također za neaktivnu radnu knjigu.
Preuzmi radnu bilježnicu za vježbu
Preuzmite ovu radnu knjigu kako biste vježbali dok čitate ovaj članak.
Excel VBA UsedRange.xlsm
Uvod u svojstvo UsedRange za VBA u Excelu
Svojstvo UsedRange od VBA vraća objekt Range . Vraća raspon koji se sastoji od svih ćelija na radnom listu koji je korišten, uključujući prazan red na početku.
U VBA kodu, svojstvo UsedRange koristi se uz naziv radnog lista. Dakle, uobičajena sintaksa za korištenje svojstva UsedRange za aktivni radni list je:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
⧭ Bilješke:
- Ovdje Rng je naziv Range koji vraća svojstvo UsedRange . Možete koristiti što god želite.
- Za korištenje svojstva UsedRange na radnom listu koji nije aktivni, umjesto toga upotrijebite naziv radnog lista.
Na primjer, da biste ga primijenili na radnom listu pod nazivom Sheet1 , umetnite:
Set Rng = Worksheets("Sheet1").UsedRange
4 načina za korištenje svojstva UsedRange VBA u Excelu
Ovdje su 4 najčešćinačini korištenja svojstva UsedRange u VBA .
1. Svojstvo VBA UsedRange za zatvoreni raspon
Prije svega, koristit ćemo svojstvo VBA UsedRange za radni list sa zatvorenim rasponom.
To' vratit će cijeli raspon uključujući prazan redak na početku.
Ovdje imamo radni list pod nazivom Sheet1 koji sadrži zatvoreni raspon koji se sastoji od imena, datuma pridruživanja i plaća neki zaposlenici tvrtke.
Sada ako koristite svojstvo UsedRange na ovom radnom listu, ono će vratiti raspon B2:C13 (Uključujući prazan redak na početku).
Ako je Sheet1 aktivan, možete koristiti:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Ili možete koristiti:
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Izlaz :
Koristili smo svojstvo Odaberi Raspona unutar koda. Dakle, ako pokrenemo kod, on će odabrati raspon B2:D13 od Sheet1 .
Pročitajte više: Kako koristiti VBA objekt raspona u Excelu (5 svojstava)
2. VBA svojstvo UsedRange za raštrkani raspon
Ako imate raštrkan raspon na bilo kojem radnom listu, svojstvo UsedRange vratit će raspon uključujući prazne ćelije između.
Sada, u Sheet1 , imamo ukupnu plaću, najvišu plaću i najnižu plaću razbacanu na raznim mjestima, od ćelije B3 do G3 , ovako:
Sada upotrijebite bilo koji od dva retka koda za korištenje svojstva UsedRange .
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Ili
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ Izlaz:
Vraća sve ćelije unutar raspona B2:G3 Sheet1 uključujući prazne ćelije (uključujući prazan red na početku). Kako smo koristili svojstvo Select za Range , ono će odabrati raspon B2:G3.
Pročitajte više: Kraj raspona pomoću VBA u Excelu (s primjerima)
Slična čitanja
- Excel VBA Kopiraj raspon na drugi list (8 najlakših načina)
- Prolazi kroz raspon za svaku ćeliju s Excel VBA (Ultimate Vodič)
- Pogreška Excel Subscript Out of Range u VBA (s 5 rješenja)
3. Svojstvo VBA UsedRange za neaktivni radni list
Ako želimo upotrijebiti svojstvo UsedRange na neaktivnom radnom listu, na početku morate spomenuti naziv radnog lista.
Na primjer, ovdje je moj aktivni radni list Sheet1 .
Da bismo koristili svojstvo UsedRange u Sheet2 , moramo koristiti :
Dim Rng As Range
Set Rng = Worksheets("Sheet2").UsedRange
To je odabrat ću sve korištene ćelije na radnom listu pod nazivom Sheet2 .
Pročitajte više: VBA za postavljanje raspona u Excel (7 primjera)
4.Svojstvo VBA UsedRange za neaktivnu radnu knjigu
Svojstvo UsedRange možete koristiti čak i za radnu knjigu koja nije aktivna. Samo stavite naziv radne knjige ispred.
Na primjer, ovdje je moja aktivna radna knjiga Radna knjiga1 . Za korištenje svojstva UsedRange nad Sheet1 Workbook2 , moramo koristiti:
Dim Rng As Range
Set Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
Odabrat će korišteni raspon radnog lista Sheet1 od Radna knjiga2 .
Pročitajte više: VBA za svaku ćeliju u rasponu u Excelu (3 metode)
Stvari koje treba zapamtiti
Svojstvo UsedRange VBA vraća objekt Range . Ovdje u ovom članku upotrijebili smo svojstvo Select objekta Range radi vizualizacije. Ali očito, možete koristiti bilo koje drugo svojstvo Raspona prema vašoj želji.
Zaključak
Koristeći ove metode, možete koristiti UsedRange svojstvo u Excelu. Imate li kakvih pitanja? Slobodno nas pitajte.