Kuidas kasutada VBA-d, et valida Exceli aktiivsest lahtrist vahemik (3 meetodit)

Hugh West

20-08-2023 Makros &; Excel VBA
  • Jaga Seda
Hugh West

Me näitame teile 3 meetodid Excel VBA aadressile valige vahemik aadressilt aktiivne rakk Selle demonstreerimiseks valisime andmestiku, mille puhul on 3 veergu : " Eesnimi ", " Perekonnanimi ", ja " E-post ". Me valime rakk ja kasutades Excel VBA valime selle vahemiku rakk .

Lae alla praktiline töövihik

Valige vahemik aktiivsest lahtrist.xlsm

3 viisi, kuidas valida vahemik aktiivsest lahtrist VBA abil Excelis

1. VBA kasutamine vahemiku valimiseks aktiivsest lahtrist viimasesse mitte tühja lahtrisse

Esimese meetodi puhul kasutame me meetodit Range.End vara.

Siin sisestame oma koodi kui Moodul . et tuua üles Moodul aknast, tee need-

Sammud:

  • Esiteks, alates Arendaja tab>>>> valige Visual Basic .

The Visual Basic ilmub aken.

  • Lõpuks, alates Sisesta >>>> valige Moodul .

See toob esile Moodul aken.

1.1. End(xlUp) omaduse kasutamine

Selles jaotises valime välja vahemik ülespoole kuni viimase tühja lahtrita lahter meie aktiivne rakk .

Sammud:

  • Esiteks, tooge üles Moodul aken.
  • Teiseks, tüüp järgmine kood. 
 Sub ToUp() Range(ActiveCell, ActiveCell.End(xlUp)).Select End Sub

Me kutsume meie Sub Menetlus ToUp Siis me valime meie vahemik Esimene väärtus on meie aktiivne rakk Viimane väärtus on ActiveCell.End(xlUp) Lõpuks valime me vahemik koos Range . Valige meetod.

  • Kolmandaks, Salvesta seda ja sulgege aken.
  • Pärast seda valige lahter C6 . see rakk on meie aktiivne rakk .

Nüüd toome üles Makro aken. Selleks, et seda teha...

  • Alates Arendaja tab>>>> valige Makros .

Pärast seda on Makro dialoogiboks ilmub.

  • Seejärel valige " ToUp " alates " Makro nimi: ".
  • Lõpuks klõpsake nuppu Käivita .

Me näeme, et me oleme valitud . rakkude vahemik C4:C6 .

Loe edasi: Excel VBA: dünaamilise vahemiku kopeerimine teise töövihikusse

1.2. End(xlDown)-omaduse kaasamine

Selles jaotises valime välja vahemik allapoole meie aktiivne rakk .

Sammud:

  • Esiteks, tooge üles Moodul aken.
  • Teiseks, tüüp järgmine kood. 
 Sub ToDown() Range(ActiveCell, ActiveCell.End(xlDown)).Select End Sub

Me kutsume meie Sub Menetlus ToDown Siis me valime oma vahemik Esimene väärtus on meie aktiivne rakk Viimane väärtus on ActiveCell.End(xlDown) Lõpuks valime me vahemik koos Range . Valige meetod.

  • Kolmandaks, Salvesta seda ja sulgege aken.
  • Pärast seda valige lahter C6 See on meie aktiivne rakk .

  • Seejärel tooge üles Makro dialoogiboks .
  • Valige " ToDown ".
  • Lõpuks klõpsake nuppu Käivita .

Seega oleme me valitud a vahemik meie aktiivne rakk kasutades Excel VBA .

Loe edasi: Exceli VBA, et läbida vahemikku kuni tühja lahtrini (4 näidet)

Sarnased artiklid

  • Excel VBA: Silmus läbi veergude vahemikus (5 näidet)
  • Kuidas kasutada VBA-d iga rea jaoks Exceli vahemikus
  • Exceli makro: Mitme veeru sorteerimine dünaamilise vahemikuga (4 meetodit)
  • VBA ridade ja veergude läbimiseks Exceli vahemikus (5 näidet)
  • Kuidas konverteerida vahemik Exceli VBA-s massiivi (3 võimalust)

1.3. Omaduse End(xlToLeft) rakendamine

Selles jaotises valime välja vahemik et vasakule meie aktiivne rakk .

Sammud:

  • Esiteks, tooge üles Moodul aken.
  • Teiseks, tüüp järgmine kood. 
 Sub ToLeft() Range(ActiveCell, ActiveCell.End(xlToLeft)).Select End Sub

Me kutsume meie Sub Menetlus ToLeft Siis me valime oma vahemik Esimene väärtus on meie aktiivne rakk Viimane väärtus on ActiveCell.End(xlToLeft) Lõpuks valime me vahemik koos Range . Valige meetod.

  • Kolmandaks, Salvesta seda ja sulgege aken.
  • Pärast seda valige lahter D7 See on meie aktiivne rakk .

  • Seejärel tooge üles Makro dialoogiboks .
  • Valige " ToLeft ".
  • Lõpuks klõpsake nuppu Käivita .

Seega oleme me valitud a vahemik meie aktiivne rakk kasutades Excel VBA .

1.4. Omaduse End(xlToRight) rakendamine

Selles jaotises valime välja vahemik et õigus meie aktiivne rakk .

Sammud:

  • Esiteks, tooge üles Moodul aken.
  • Teiseks, tüüp järgmine kood. 
 Sub ToLeft() Range(ActiveCell, ActiveCell.End(xlToRight)).Select End Sub

Me kutsume meie Alammenetlus ToRight Siis me valime oma vahemik Esimene väärtus on meie aktiivne rakk Viimane väärtus on ActiveCell.End(xlToRight) Lõpuks valime me vahemik koos Range . Valige meetod.

  • Kolmandaks, Salvesta seda ja sulgege aken.
  • Pärast seda valige lahter C8 See on meie aktiivne rakk .

  • Seejärel tooge üles Makro dialoogiboks .
  • Valige " ToRight ".
  • Lõpuks klõpsake nuppu Käivita .

Seega oleme me valitud a vahemik meie aktiivne rakk kasutades Excel VBA .

2. VBA Range.Offset-omaduse kasutamine VBA abil Exceli aktiivse lahtri vahemiku valimiseks VBA abil

Teise meetodi puhul kasutame me meetodit VBA Range.Offset omadus valida vahemik kasutades meie aktiivne rakk .

Sammud:

  • Esiteks, tüüp järgmine kood faili Moodul aken. 
 Sub UsingOffset() Range(ActiveCell, ActiveCell.Offset(1, 2)).Select End Sub

Me oleme loonud oma Alammenetlus UsingOffset Siis me valime oma vahemik Esimene väärtus on meie aktiivne rakk Viimane väärtus on ActiveCell.Offset (1,2) . koos Offset vara me liigume 1 rida allapoole ja 2 veergu õigus Lõpuks valime me vahemik koos Range . Valige meetod.

  • Teiseks, Salvesta seda ja sulgege aken.
  • Pärast seda valige lahter B8 See on meie aktiivne rakk .

  • Seejärel tooge üles Makro dialoogiboks .
  • Valige " UsingOffset ".
  • Lõpuks klõpsake nuppu Käivita .

Kokkuvõtteks, me oleme valitud a vahemik alates aktiivne rakk Lisaks peaks viimane samm välja nägema selline.

Loe edasi: Excel VBA: saada väärtustega lahtrite vahemik (7 näidet)

3. Valige vahemik aktiivsest lahtrist VBA abil Excelis, kasutades CurrentRegion-omadust

Viimase meetodi puhul kasutame me meetodit Range.CurrentRegion vara.

Sammud:

  • Esiteks, tüüp järgmine kood faili Moodul aken. 
 Sub cRegion() ActiveCell.CurrentRegion.Select End Sub

Me kutsume meie Sub Menetlus cRegioon Siis me valime meie vahemik . koos CurrentRegion vara, me valime vahemik kuni tühi lahter Lõpuks valime me vahemik koos Range . Valige meetod.

  • Teiseks, Salvesta seda ja minna tagasi Excel leht.
  • Pärast seda valige lahter C10 See on meie aktiivne rakk .

  • Seejärel tooge üles Makro dialoogiboks .
  • Valige " cRegioon ".
  • Lõpuks klõpsake nuppu Käivita .

Seega oleme me valitud . vahemik kuni tühi lahter .

Praktika sektsioon

Oleme esitanud iga meetodi jaoks praktilised andmekogumid dokumendis Excel faili.

Kokkuvõte

Me näitasime teile 3 meetodid Excel VBA valige vahemik aadressilt aktiivne rakk Kui teil on probleeme sammude mõistmisega, siis kommenteerige allpool. Täname lugemise eest, jätkake kiitust!

Eelmine postitus Kuidas konverteerida kuupäev tekstiks YYYYMMDD (3 kiiret viisi)
Järgmine postitus Kuidas kasutada VBA DIR-funktsiooni Excelis (7 praktilist näidet)

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.