VBA-lopputoiminto - Loppuomaisuuden käyttö VBA: ssa (esimerkkien kanssa)

Sisällysluettelo

Lopeta toiminto VBA: ssa

Loppu on VBA-lause, jolla on useita muotoja VBA-sovelluksissa, yksinkertainen Lauseke voidaan laittaa mihin tahansa koodiin ja se lopettaa koodin suorittamisen automaattisesti. Lausetta käytetään monissa menettelyissä, kuten alimenettelyn lopettamiseksi tai lopettamiseksi mikä tahansa loop-toiminto, kuten End if.

Kaikella on loppu, ja VBA: ssa se ei ole erilainen. Sinun on täytynyt nähdä tämä sana ” Loppu ” kaikissa VBA: n koodeissa. Voimme päättyä "End Sub", "End Function", "End If". Nämä ovat yleisiä, koska tiedämme, että kukin pää ehdottaa menettelyn päättymistä. Nämä VBA End -lausekkeet eivät vaadi erityistä esittelyä, koska tunnemme sen VBA-koodauksessamme.

Edellä mainitun "End" -kohdan lisäksi meillä on yksi ominaisuus, "End" VBA: ssa. Tässä artikkelissa opastamme sinut läpi kyseisen ominaisuuden ja miten sitä käytetään koodauksessamme.

Loppuomaisuus VBA: ssa

"Loppu" on ominaisuus, jota käytämme VBA: ssa liikkuessamme ehdotettuun suuntaan. Tyypillinen esimerkki suunnasta on siirtyminen aktiivisesta solusta viimeksi käytettyyn soluun tai viimeiseen syöttösoluun vaaka- ja pystysuunnassa laskentataulukossa.

Muistetaanpa tämä esimerkiksi laskentataulukolla. Katso alla olevaa kuvaa.

Tällä hetkellä olemme A1-solussa.

Jos haluamme siirtyä viimeksi käytettyyn soluun vaakasuunnassa, käytämme Excelin pikanäppäintä Ctrl + oikea nuoli, ja se vie meidät viimeksi käytettyyn soluun vaakasuunnassa.

Vastaavasti, jos haluamme siirtyä viimeksi käytettyyn soluun alaspäin tai pystysuunnassa, painamme pikanäppäintä Ctrl + alanuoli.

Joten siirtyä vasemmalta oikealle, paina Ctrl + Vasen nuoli. Voit siirtyä alhaalta ylöspäin painamalla Ctrl + Ylänuoli.

Samanlainen asia voidaan tehdä VBA: ssa, mutta ei käyttämällä Ctrl- näppäintä. Meidän on pikemminkin käytettävä sanaa "End".

Esimerkkejä Excel VBA End -toiminnosta

Esimerkki # 1 - Käytä VBA End -ominaisuutta siirtyäksesi laskentataulukossa

Katsotaanpa, miten Excel VBA End -ohjelmaa käytetään siirtymiseen taulukossa. Ensinnäkin meidän on päätettävä, minkä solun meidän on siirrettävä. Ok, sanotaan, että meidän on siirryttävä solusta A1, joten viittaa soluun käyttämällä VBA Range -objektia.

Koodi:

Sub End_Example1 () Alue ("A1") Sub Sub

Laita piste (.) Nähdäksesi IntelliSense-luettelon. Valitse luettelosta "End" VBA-ominaisuus.

Koodi:

Sub End_Example1 () -alue ("A1"). End End Sub

Kun valittu ominaisuus on valittu, avataan sulkeet.

Koodi:

Sub End_Example1 () -alue ("A1"). End (End Sub

Heti kun avaat sulkeet, voimme nähdä kaikki käytettävissä olevat vaihtoehdot "End" -ominaisuudella. Valitse ”xlToRight” siirtyäksesi solusta A1 viimeksi käytettyyn soluun vaakasuunnassa.

Koodi:

Sub End_Example1 () -alue ("A1"). End (xlToRight) End Sub

Kun olemme siirtyneet viimeiseen soluun, meidän on valittava, mitä meidän on tehtävä. Laita piste (.) Nähdäksesi IntelliSense-luettelon.

Koodi:

Sub End_Example1 () -alue ("A1"). End (xlToRight). End Sub

Valitse "Valitse" -menetelmä IntelliSense-luettelosta.

Koodi:

Sub End_Example1 () Range ("A1"). End (xlToRight). Valitse End Sub

Tämä käyttää solua A1 viimeisten käytettyjen solujen vaakasuoraan.

Käytä vastaavasti kolmea muuta vaihtoehtoa siirtyäksesi oikealle, vasemmalle, alas, ylös.

Siirtyminen oikealle solusta A1.

Koodi:

Sub End_Example1 () Range ("A1"). End (xlToRight). Valitse End Sub

Siirtyminen alas solusta A1.

Koodi:

Sub End_Example1 () -alue ("A1"). End (xlDown). Valitse End Sub

Siirtyminen solusta A5 ylöspäin.

Koodi:

Sub End_Example1 () -alue ("A5"). End (xlUp). Valitse End Sub

Siirry vasemmalle solusta D1.

Koodi:

Sub End_Example1 () -alue ("D1"). End (xlToLeft). Valitse End Sub

Kaikki yllä olevat koodit ovat esimerkkiominaisuuksista End-ominaisuuden käytöstä laskentataulukossa liikkumiseen.

Now we will see how to select the ranges by using the “End” property.

Example #2 - Selection Using End Property

We need to End the property to select the range of cells in the worksheet. For this example, consider the below data.

Select A1 to Last Used Cell

To select the cells from A1 to the last used cell horizontally, first, mention the cell A1 in Range object.

Code:

Sub End_Example2() Range("A1", End Sub

For the second argument, open one more Range object and mention the cell as A1 only.

Code:

Sub End_Example2() Range("A1",Range("A1") End Sub

Close only one bracket and put a dot to select the Excel VBA End property.

Code:

Sub End_Example2() Range("A1",Range("A1").End( End Sub

Now select xlToRight and close two brackets.

Code:

Sub End_Example2() Range("A1",Range("A1").End(xlToRight)) End Sub

Now chose the “Select” method.

Code:

Sub End_Example2() Range("A1", Range("A1").End(xlToRight)).Select End Sub

Ok, we are done.

Run this code to see the impact.

As you can see, it has selected the range A1 to D1.

Similarly, to select downwards, use the below code.

Code:

Sub End_Example2() Range("A1", Range("A1").End(xlDown)).Select 'To select from left to right End Sub

Code:

Sub End_Example2() Range("A1", Range("A1").End(xlDown)).Select 'To select from top to down End Sub

Code:

Sub End_Example2() Range("D1", Range("D1").End(xlToLeft)).Select 'To select from right to left End Sub

Code:

Sub End_Example2() Range("A5", Range("A5").End(xlUp)).Select 'To select from bottom to up End Sub

Esimerkki # 3 - Valitse Oikealta vasemmalle, Oikealta alhaalle ja ylhäältä

Olemme nähneet, kuinka valita vaaka- ja pystysuunnassa. Jos haluat valita sekä pysty- että vaakasuunnassa, meidän on käytettävä kahta End-ominaisuutta. Tietojen valitsemiseksi välillä A1 - D5 meidän on käytettävä alla olevaa koodia.

Koodi:

Alaloppu_esimerkki3 () Alue ("A1", Alue ("A1"). Loppu (xlDown). Loppu (xlToRight)). Valitse "Vastaanottaja solusta A1, kunnes viimeksi käytetään solua alaspäin ja oikealle Lopeta ali

Tämä valitsee koko alueen, kuten alla.

Tällä tavoin voimme käyttää solualueen VBA "End" -toiminnon avulla.

Mielenkiintoisia artikkeleita...