Končna funkcija VBA - Uporaba končne lastnosti v VBA (s primeri)

Končna funkcija v VBA

Konec je stavek v VBA, ki ima več obrazcev v aplikacijah VBA, preprost stavek Konec lahko postavite kamor koli v kodo in samodejno ustavi izvajanje kode, končni stavek se uporablja v številnih postopkih, kot je končanje podprocedure ali konec katero koli funkcijo zanke, kot je End if.

Za vse obstaja konec in v VBA ni nič drugače. Gotovo ste videli to besedo " Konec " v vseh kodah v vašem VBA. Končamo lahko v »End Sub«, »End Function«, »End If«. Ti so pogosti, saj vemo, da vsak konec predlaga konec postopka. Ti stavki VBA End ne zahtevajo posebnih predstavitev, ker jih poznamo v našem kodiranju VBA.

Poleg zgornjega "End" imamo v VBA še eno lastnost, "End". V tem članku vas bomo vodili skozi to lastnost in kako jo uporabiti pri kodiranju.

Končna lastnina v VBA

"Konec" je lastnost, ki jo uporabljamo v VBA za premikanje v predlagani smeri. Tipičen primer smeri je premikanje od aktivne celice do zadnje uporabljene celice ali zadnje vnosne celice vodoravno in navpično na delovnem listu.

Na primer, spomnimo se tega z delovnim listom. Poglejte spodnjo sliko.

Trenutno smo v celici A1.

Če se želimo premakniti na zadnjo uporabljeno celico vodoravno, uporabimo bližnjično tipko excel Ctrl + puščica desno in vodi nas do zadnje uporabljene celice vodoravno.

Podobno, če se želimo premakniti na zadnjo uporabljeno celico navzdol ali navpično, pritisnemo bližnjično tipko Ctrl + puščica dol.

Za premik od leve proti desni pritisnemo Ctrl + puščica levo. Če se želite pomakniti od spodaj navzgor, pritisnite Ctrl + puščica navzgor.

Podobno lahko storimo v VBA, vendar ne s tipko Ctrl . Namesto tega moramo uporabiti besedo "Konec."

Primeri funkcije Excel VBA End

Primer # 1 - Uporabite končno lastnost VBA za premikanje na delovnem listu

Poglejmo, kako uporabiti Excel VBA End za premikanje po listu. Najprej se moramo odločiti, katero celico moramo premakniti. Ok, recimo, da se moramo premakniti iz celice A1, zato napotite celico z uporabo predmeta VBA Range.

Koda:

Sub End_Example1 () Obseg ("A1") End Sub

Postavite piko (.), Da se prikaže seznam IntelliSense. Na seznamu izberite lastnost »End« VBA.

Koda:

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

Ko je končna lastnost izbrana, odprite oklepaj.

Koda:

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

Takoj ko odprete oklepaje, lahko vidimo vse razpoložljive možnosti z lastnostjo »Konec«. Izberite “xlToRight”, da se vodoravno premaknete iz celice A1 v zadnjo uporabljeno celico.

Koda:

Sub End_Example1 () Obseg ("A1"). End (xlToRight) End Sub

Po prehodu v zadnjo celico moramo izbrati, kaj moramo storiti. Postavite piko (.), Da se prikaže seznam IntelliSense.

Koda:

Sub End_Example1 () Obseg ("A1"). End (xlToRight). Končaj pod

Na seznamu IntelliSense izberite metodo »Select«.

Koda:

Sub End_Example1 () Obseg ("A1"). End (xlToRight). Izberite End Sub

Tako bo celica A1 uporabljena za zadnjo uporabo celic vodoravno.

Podobno uporabite ostale tri možnosti za premikanje desno, levo, dol, gor.

Za premik desno iz celice A1.

Koda:

Sub End_Example1 () Obseg ("A1"). End (xlToRight). Izberite End Sub

Za premik navzdol iz celice A1.

Koda:

Sub End_Example1 () Obseg ("A1"). End (xlDown). Izberite End Sub

Za premik gor iz celice A5.

Koda:

Sub End_Example1 () Obseg ("A5"). End (xlUp). Izberite End Sub

Za premik levo iz celice D1.

Koda:

Sub End_Example1 () Obseg ("D1"). End (xlToLeft). Izberite End Sub

Vse zgornje kode so vzorčni primeri uporabe lastnosti "End" za premikanje na delovnem listu.

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

3. primer - izberite Desno na levo, Desno na dno in zgoraj

Videli smo, kako izbrati vodoravno in navpično. Za izbiro navpično in vodoravno moramo uporabiti dve lastnosti "End". Za izbiro podatkov od A1 do D5 moramo uporabiti spodnjo kodo.

Koda:

Sub End_Example3 () Obseg ("A1", obseg ("A1"). Konec (xlDown). End (xlToRight)). Izberite 'To iz celice A1 do zadnje uporabe celice navzdol in desno End Sub

S tem boste izbrali celoten obseg, kot je spodaj.

Tako lahko z lastnostjo funkcije VBA "End" izberemo obseg celic.

Zanimive Članki...