Koncová funkcia VBA - Použitie vlastnosti End vo VBA (s príkladmi)

Obsah

Koncová funkcia vo VBA

Koncová funkcia vo VBA

End je príkaz vo VBA, ktorý má v aplikáciách VBA viac foriem, jednoduchý príkaz End je možné umiestniť kdekoľvek v kóde a automaticky zastaví vykonávanie kódu, príkaz end sa používa v mnohých postupoch, ako je ukončenie podprocesu alebo ukončenie. ľubovoľná funkcia slučky ako End if.

Pre všetko existuje koniec a vo VBA to nie je inak. Toto slovo „ Koniec “ ste už určite videli vo všetkých kódoch vo VBA. Môžeme skončiť na „End Sub“, „End Function“, „End If“. Sú bežné, ako vieme, každý koniec naznačuje koniec postupu. Tieto vyhlásenia o ukončení VBA nevyžadujú nijaké špeciálne predstavenie, pretože ich poznáme v našom kódovaní VBA.

Okrem vyššie uvedeného „End“ máme vo VBA jednu vlastnosť „End“. V tomto článku vás prevedieme touto vlastnosťou a tým, ako ju používať v našom kódovaní.

Koniec vlastníctva vo VBA

„End“ je vlastnosť, ktorú používame vo VBA na pohyb navrhovaným smerom. Typickým príkladom smeru je prechod z aktívnej bunky do naposledy použitej bunky alebo do poslednej vstupnej bunky horizontálne a vertikálne v pracovnom hárku.

Napríklad si to pripomeňme s pracovným listom. Pozrite sa na obrázok nižšie.

Práve sme v bunke A1.

Ak sa chceme presunúť na poslednú použitú bunku vodorovne, použijeme klávesovú skratku programu Excel Ctrl + šípka doprava a prenesie nás to na poslednú použitú bunku vodorovne.

Podobne, ak sa chceme presunúť na poslednú použitú bunku smerom dole alebo zvisle, stlačíme klávesovú skratku Ctrl + šípka dole.

Takže aby sme sa pohybovali zľava doprava, stlačíme Ctrl + šípka doľava. Ak sa chcete pohybovať zdola nahor, stlačte Ctrl + šípka hore.

Podobnú vec je možné vykonať vo VBA, ale nie pomocou klávesu Ctrl . Skôr musíme použiť slovo „Koniec“.

Príklady ukončovacej funkcie programu Excel VBA

Príklad č. 1 - Použite vlastnosť konca jazyka VBA na presun v pracovnom hárku

Pozrime sa, ako sa dá v hárku používať Excel VBA End. Najskôr sa musíme rozhodnúť, ktorou bunkou sa musíme pohnúť. Dobre, povedzme, že sa musíme presunúť z bunky A1, takže bunku odkazujte pomocou objektu VBA Range.

Kód:

Sub End_Example1 () Rozsah ("A1") End Sub

Ak chcete zobraziť zoznam IntelliSense, vložte bodku (.) . V zozname vyberte možnosť „Ukončiť“ vlastnosť VBA.

Kód:

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

Akonáhle je koncová vlastnosť vybraná otvorená zátvorka.

Kód:

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

Hneď ako otvoríte zátvorku, uvidíme všetky dostupné možnosti s vlastnosťou „Koniec“. Vyberte „xlToRight“, aby ste sa presunuli z bunky A1 do poslednej použitej bunky horizontálne.

Kód:

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

Po prechode do poslednej bunky musíme zvoliť, čo musíme urobiť. Ak chcete zobraziť zoznam technológie IntelliSense, vložte bodku (.).

Kód:

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

Vyberte metódu „Vybrať“ zo zoznamu IntelliSense.

Kód:

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

Týmto sa použije bunka A1 na naposledy použité bunky vodorovne.

Podobne použite ďalšie tri možnosti na pohyb doprava, doľava, dole, hore.

Presun doprava z bunky A1.

Kód:

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

Posun nadol z bunky A1.

Kód:

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

Posun nahor z bunky A5.

Kód:

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

Posun doľava z bunky D1.

Kód:

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

Všetky vyššie uvedené kódy sú ukážkovými príkladmi použitia vlastnosti „Koniec“ na presun v pracovnom hárku.

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

Príklad č. 3 - Vyberte možnosť sprava doľava, sprava dole a hore

Videli sme, ako vyberať horizontálne a vertikálne. Na výber zvisle aj vodorovne musíme použiť dve vlastnosti „Koniec“. Na výber údajov od A1 do D5 musíme použiť nasledujúci kód.

Kód:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown) .End (xlToRight)). Vyberte 'Komu z bunky A1 na posledné použitie bunky smerom nadol a doprava End Sub

Týmto sa vyberie celý rozsah, ako je uvedené nižšie.