Sadržaj
Pokazat ćemo vam 3 metode u Excel VBA za odabir raspona iz aktivne ćelije . Da bismo to demonstrirali, odabrali smo skup podataka s 3 stupca : “ Ime ”, “ Prezime ” i “ E-pošta ”. Odabrat ćemo ćeliju i pomoću Excel VBA odabrat ćemo raspon iz te ćelije .
Preuzmite radnu bilježnicu za vježbu
Odaberite raspon iz Active Cell.xlsm
3 načina odabira raspona iz aktivne ćelije pomoću VBA u Excelu
1. Korištenje VBA za odabir raspona od aktivne ćelije do zadnje ćelije koja nije prazna
Za prvu metodu, koristit ćemo svojstvo Range.End .
Ovdje ćemo unijeti naš kod kao Modul . Da biste pokrenuli prozor Modul , učinite ove-
Korake:
- Prvo, iz Developera kartica >>> odaberite Visual Basic .
Pojavit će se prozor Visual Basic .
- Konačno, iz Insert >>> odaberite Modul .
Ovo će otvoriti prozor Modul .
1.1. Korištenje svojstva End(xlUp)
U ovom ćemo odjeljku odabrati raspon gore do posljednje neprazne ćelije iz naše aktivne ćelije .
Koraci:
- Prvo, otvorite prozor Modul .
- Drugo, upišite sljedeći kod.
3874
Zovemo naš Sub Procedura ToUp . Zatim odabiremo naš raspon . Prva vrijednost je naša aktivna ćelija . Zadnja vrijednost je ActiveCell.End(xlUp) . Konačno, odabiremo raspon metodom Raspon . Odaberi .
- Treće, Spremite i zatvorite prozor.
- Nakon toga odaberite ćeliju C6 . Ova ćelija je naša aktivna ćelija .
Sada ćemo pokrenite prozor Makro . Da biste to učinili-
- Na kartici Razvojni programer >>> odaberite Makronaredbe .
Nakon toga pojavit će se Makronaredbe dijaloški okvir .
- Zatim odaberite “ ToUp ” iz “ Naziv makronaredbe: ”.
- Na kraju kliknite na Pokreni .
Možemo vidjeti da smo odabrali raspon ćelija C4:C6 .
Pročitajte više: Excel VBA: kopirajte dinamički raspon u drugu radnu knjigu
1.2. Uključivanje svojstva End(xlDown)
U ovom odjeljku ćemo odabrati raspon prema dolje iz naše aktivne ćelije .
Koraci:
- Prvo, pokrenite prozor Modul .
- Drugo, upišite sljedeći kod.
1662
Pozivamo naš Sub Procedure ToDown . Zatim odabiremo naš raspon . Prva vrijednost je naša aktivna ćelija . Zadnja vrijednost je ActiveCell.End(xlDown) . Konačno, jesmoodabirom raspona pomoću Raspona . Odaberite metodu.
- Treće, Spremite i zatvorite prozor.
- Nakon toga odaberite ćeliju C6 . Ovo je naša aktivna ćelija .
- Zatim pokrenite Makro dijaloški okvir .
- Odaberite “ ToDown ”.
- Na kraju kliknite na Run .
Dakle, odabrali smo raspon iz naše aktivne ćelije koristeći Excel VBA .
Pročitajte više: Excel VBA za kretanje kroz raspon do prazne ćelije (4 primjera)
Slični članci
- Excel VBA: Prođite kroz stupce u rasponu (5 primjera)
- Kako koristiti VBA za svaki redak u rasponu u Excelu
- Excel makronaredba: Sortiraj više stupaca s dinamičkim rasponom (4 metode)
- VBA za kretanje kroz retke i stupce u rasponu u Excelu (5 primjera)
- Kako pretvoriti raspon u polje u programu Excel VBA (3 načina)
1.3. Primjena svojstva End(xlToLeft)
U ovom odjeljku, odabrat ćemo raspon lijevo naše aktivne ćelije .
Koraci:
- Prvo, otvorite prozor Modul .
- Drugo, upišite sljedeći kod.
2414
Pozivamo našu Sub Proceduru ToLeft . Zatim odabiremo naš raspon . Prva vrijednost je naša aktivna ćelija . Posljednja vrijednost je ActiveCell.End(xlToLeft) . Konačno, odabiremo raspon s Raspon . Odaberite metodu.
- Treće, Spremite i zatvorite prozor.
- Nakon toga odaberite ćeliju D7 . Ovo je naša aktivna ćelija .
- Zatim pokrenite Makro dijaloški okvir .
- Odaberite “ ToLeft ”.
- Na kraju kliknite na Run .
Dakle, odabrali smo raspon iz naše aktivne ćelije koristeći Excel VBA .
1.4. Implementacija svojstva End(xlToRight)
U ovom odjeljku, odabrat ćemo raspon desno naše aktivne ćelije .
Koraci:
- Prvo, otvorite prozor Modul .
- Drugo, upišite sljedeći kod.
7531
Pozivamo našu Podproceduru ToRight . Zatim odabiremo naš raspon . Prva vrijednost je naša aktivna ćelija . Zadnja vrijednost je ActiveCell.End(xlToRight) . Konačno, odabiremo raspon s Raspon . Odaberite metodu.
- Treće, Spremite i zatvorite prozor.
- Nakon toga odaberite ćeliju C8 . Ovo je naša aktivna ćelija .
- Zatim pokrenite Makro dijaloški okvir .
- Odaberite “ ToRight ”.
- Na kraju kliknite na Run .
Dakle, odabrali smo raspon iz naše aktivne ćelije koristeći Excel VBA .
2. Korištenje VBA svojstva Range.Offset za odabir raspona iz aktivne ćelije Korištenje VBA u Excelu
Za drugu metodu upotrijebit ćemo svojstvo VBA Range.Offset za odabir raspona pomoću naše aktivne ćelije .
Koraci:
- Prvo, upišite sljedeći kod u prozor Modul .
4221
Stvorili smo našu Podproceduru Korištenje pomaka . Zatim odabiremo naš raspon . Prva vrijednost je naša aktivna ćelija . Zadnja vrijednost je ActiveCell.Offset (1,2) . Sa Svojstvom pomaka pomičemo 1 red dolje i 2 stupca desno . Konačno, odabiremo raspon s Raspon . Odaberite metodu.
- Drugo, Spremite i zatvorite prozor.
- Nakon toga odaberite ćeliju B8 . Ovo je naša aktivna ćelija .
- Zatim pokrenite Makro dijaloški okvir .
- Odaberite “ UsingOffset ”.
- Na kraju kliknite na Pokreni .
U zaključku, odabrali smo raspon iz aktivne ćelije . Štoviše, ovako bi trebao izgledati posljednji korak.
Pročitajte više: Excel VBA: Dohvatite raspon ćelija s vrijednostima (7 Primjeri)
3. Odaberite raspon iz aktivne ćelije koristeći VBA u Excelu korištenjem svojstva CurrentRegion
Za posljednju metodu koristit ćemo svojstvo Range.CurrentRegion .
Koraci:
- Prvo, upišite sljedeći kod u prozor Modul .
7577
Pozivamo našu Pod proceduru cRegija . Zatim odabiremo naš raspon . Sa svojstvom CurrentRegion odabiremo raspon do prazne ćelije . Konačno, odabiremo raspon s Raspon . Odaberite metodu.
- Drugo, Spremite i vratite se na Excel list.
- Nakon toga odaberite ćeliju C10 . Ovo je naša aktivna ćelija .
- Zatim pokrenite Makro dijaloški okvir .
- Odaberite “ cRegion ”.
- Na kraju kliknite na Run .
Dakle, odabrali smo raspon do prazne ćelije .
Odjeljak za vježbu
Omogućili smo skupove podataka za praksu za svaku metodu u datoteci Excel .
Zaključak
Mi' pokazali smo vam 3 metode Excel VBA odaberite raspon iz aktivne ćelije . Ako imate problema s razumijevanjem koraka, slobodno komentirajte ispod. Hvala na čitanju, samo napred!