VBA-sluttfunksjon - Bruke sluttegenskap i VBA (med eksempler)

Innholdsfortegnelse

Sluttfunksjon i VBA

Slutten er en uttalelse i VBA som har flere former i VBA-applikasjoner, enkel sluttuttalelse kan plasseres hvor som helst i koden, og den vil automatisk stoppe utførelsen av koden, sluttuttalelse brukes i mange prosedyrer som å avslutte underprosedyren eller å avslutte hvilken som helst sløyfefunksjon som End if.

For alt er det en slutt, og i VBA er det ikke annerledes. Du må ha sett dette ordet " Slutt " i alle kodene i VBA. Vi kan avslutte i "End Sub", "End Function", "End If." Disse er vanlige, ettersom vi vet at hver ende antyder slutten av prosedyren. Disse VBA-sluttuttalelsene krever ingen spesiell introduksjon fordi vi er kjent med det i vår VBA-koding.

Bortsett fra ovennevnte "End", har vi en eiendom, "End" i VBA. I denne artikkelen vil vi ta deg gjennom den egenskapen og hvordan du bruker den i kodingen vår.

Slutt eiendom i VBA

"End" er eiendommen vi bruker i VBA for å bevege oss i den foreslåtte retningen. Det typiske retningseksemplet beveger seg fra den aktive cellen til den sist brukte cellen eller den siste oppføringscellen horisontalt og vertikalt i regnearket.

La oss for eksempel huske dette med et regneark. Se på bildet nedenfor.

Akkurat nå er vi i A1-cellen.

Hvis vi vil flytte til den sist brukte cellen horisontalt, bruker vi hurtigtasten Ctrl + høyre pil, og den tar oss til den sist brukte cellen horisontalt.

På samme måte, hvis vi vil flytte til den sist brukte cellen nedover eller vertikalt, trykker vi hurtigtasten Ctrl + Pil ned.

Så for å flytte fra venstre til høyre, trykker vi Ctrl + venstre pil. For å flytte fra bunn til topp, trykker vi Ctrl + Pil opp.

En lignende ting kan gjøres i VBA, men ikke ved å bruke Ctrl- tasten. Snarere må vi bruke ordet "slutt."

Eksempler på Excel VBA-sluttfunksjon

Eksempel nr. 1 - Bruk VBA-sluttegenskap for å flytte i regneark

La oss se på hvordan du bruker Excel VBA End til å flytte i arket. Først må vi bestemme hvilken celle vi trenger å flytte. Ok, la oss si at vi må flytte fra cellen A1, så referer cellen ved å bruke VBA Range-objektet.

Kode:

Sub End_Example1 () Range ("A1") End Sub

Sett prikk (.) For å se IntelliSense-listen. Velg "End" VBA-egenskap fra listen.

Kode:

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

Når sluttegenskapen er valgt, åpner du parentes.

Kode:

Sub End_Example1 () Range ("A1") End (End Sub

Så snart du åpner parentes, kan vi se alle tilgjengelige alternativer med "End" -egenskapen. Velg "xlToRight" for å flytte fra celle A1 til den sist brukte cellen horisontalt.

Kode:

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

Etter å ha flyttet til den siste cellen, må vi velge hva vi trenger å gjøre. Sett prikk (.) For å se IntelliSense-listen.

Kode:

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

Velg "Velg" -metoden fra IntelliSense-listen.

Kode:

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

Dette vil gjøre bruk av celle A1 til sist brukte celler horisontalt.

På samme måte kan du bruke de tre andre alternativene for å flytte høyre, venstre, ned, opp.

Å flytte til høyre fra celle A1.

Kode:

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

Å flytte ned fra celle A1.

Kode:

Sub End_Example1 () Range ("A1"). End (xlDown). Velg End Sub

Å flytte opp fra celle A5.

Kode:

Sub End_Example1 () Range ("A5"). End (xlUp). Velg End Sub

Å flytte til venstre fra celle D1.

Kode:

Sub End_Example1 () Range ("D1"). End (xlToLeft). Velg End Sub

Alle kodene ovenfor er eksempler på bruk av "End" -egenskapen for å flytte i regnearket.

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

Eksempel 3 - Velg høyre mot venstre, høyre mot bunn og topp

Vi har sett hvordan vi skal velge horisontalt og vertikalt. For å velge både vertikalt og horisontalt, må vi bruke to "End" -egenskaper. For å velge data fra A1 til D5, må vi bruke koden nedenfor.

Kode:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown) .End (xlToRight)). Velg 'Til fra celle A1 til siste bruk celle nedover og høyre End Sub

Dette vil velge hele spekteret som nedenfor.

Slik kan vi bruke VBA "End" -funksjonen til å velge et celleområde.

Interessante artikler...