VBA-slutfunktion - Brug af slutegendom i VBA (med eksempler)

Indholdsfortegnelse

Slutfunktion i VBA

End er en erklæring i VBA, som har flere former i VBA-applikationer, enkel End-sætning kan placeres hvor som helst i koden, og den stopper automatisk udførelsen af ​​koden, sluterklæringen bruges i mange procedurer som at afslutte underproceduren eller at afslutte enhver loop-funktion som Afslut hvis.

For alt er der en ende, og i VBA er det ikke anderledes. Du skal have set dette ord " Afslut " i alle koder i din VBA. Vi kan slutte i "End Sub", "End Function", "End If." Disse er almindelige, da vi kender hver ende, der foreslår afslutningen på proceduren. Disse VBA End-udsagn kræver ingen særlig introduktion, fordi vi er fortrolige med det i vores VBA-kodning.

Bortset fra ovenstående "End" har vi en egenskab, "End" i VBA. I denne artikel vil vi tage dig gennem denne egenskab, og hvordan du bruger den i vores kodning.

Afslut ejendom i VBA

"End" er den egenskab, vi bruger i VBA til at bevæge os i den foreslåede retning. Det typiske retningseksempel er at bevæge sig fra den aktive celle til den sidst anvendte celle eller den sidste indtastningscelle vandret og lodret i regnearket.

Lad os for eksempel huske dette med et regneark. Se på billedet nedenfor.

Lige nu er vi i A1-cellen.

Hvis vi vil flytte til den sidst anvendte celle vandret, bruger vi excel-genvejstasten Ctrl + højre pil, og det fører os til den sidst anvendte celle vandret.

Tilsvarende, hvis vi vil flytte til den sidst anvendte celle nedad eller lodret, skal vi trykke på genvejstasten Ctrl + Pil ned.

Så for at flytte fra venstre til højre, trykker vi på Ctrl + venstre pil. For at flytte fra bund til top skal vi trykke på Ctrl + Pil op.

En lignende ting kan gøres i VBA, men ikke ved hjælp af Ctrl- tasten. Vi skal snarere bruge ordet "slut".

Eksempler på Excel VBA-slutfunktion

Eksempel # 1 - Brug VBA-slutegenskab til at flytte i regneark

Lad os se på, hvordan du bruger Excel VBA End til at flytte i arket. Først skal vi beslutte, hvilken celle vi har brug for at flytte. Ok, lad os sige, at vi skal flytte fra cellen A1, så henvis cellen ved hjælp af VBA Range-objektet.

Kode:

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

Sæt punkt (.) For at se IntelliSense-listen. Vælg "Afslut" VBA-ejendom fra listen.

Kode:

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

Når slutegenskaben er valgt åben parentes.

Kode:

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

Så snart du åbner parentes, kan vi se alle de tilgængelige muligheder med "End" -egenskaben. Vælg "xlToRight" for at flytte fra celle A1 til den sidst anvendte celle vandret.

Kode:

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

Efter at have flyttet til den sidste celle, skal vi vælge, hvad vi skal gøre. Sæt punkt (.) For at se IntelliSense-listen.

Kode:

Sub End_Example1 () Range ("A1") End (xlToRight). Afslut sub

Vælg "Vælg" -metoden fra IntelliSense-listen.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight). Vælg End Sub

Dette vil gøre brug af celle A1 til sidst brugte celler vandret.

På samme måde skal du bruge de tre andre muligheder til at flytte til højre, venstre, ned, op.

At flytte til højre fra celle A1.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight). Vælg End Sub

Sådan flyttes ned fra celle A1.

Kode:

Sub End_Example1 () Range ("A1"). End (xlDown). Vælg End Sub

At flytte op fra celle A5.

Kode:

Sub End_Example1 () Range ("A5"). End (xlUp). Vælg End Sub

For at flytte til venstre fra celle D1.

Kode:

Sub End_Example1 () Range ("D1"). End (xlToLeft). Vælg End Sub

Alle ovenstående koder er eksempler på brug af egenskaben “Slut” til at 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 - Vælg højre til venstre, højre mod bund og top

Vi har set, hvordan man vælger vandret og lodret. For at vælge både lodret og vandret skal vi bruge to "slut" -egenskaber. For at vælge data fra A1 til D5 skal vi bruge nedenstående kode.

Kode:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown). End (xlToRight)). Vælg 'Til fra celle A1 til sidst brug celle nedad og til højre End Sub

Dette vælger det komplette interval som nedenfor.

På denne måde kan vi bruge egenskaben VBA "End" -funktion til at vælge et celleområde.

Interessante artikler...