VBA End

End Function w VBA

End to instrukcja w języku VBA, która ma wiele form w aplikacjach VBA, prostą instrukcję End można umieścić w dowolnym miejscu kodu i automatycznie zatrzyma wykonanie kodu, instrukcja end jest używana w wielu procedurach, takich jak zakończenie podprocedury lub zakończenie dowolna funkcja pętli, taka jak End if.

Na wszystko jest koniec iw VBA nie jest inaczej. Musiałeś widzieć słowo „ koniec ” we wszystkich kodach w swoim VBA. Możemy zakończyć na „End Sub”, „End Function”, „End If”. Są one powszechne, ponieważ wiemy, że każdy koniec sugeruje zakończenie procedury. Te instrukcje końcowe VBA nie wymagają żadnego specjalnego wprowadzenia, ponieważ znamy je w naszym kodowaniu VBA.

Oprócz powyższego „End” mamy jedną właściwość „End” w VBA. W tym artykule przeprowadzimy Cię przez tę właściwość i jak ją wykorzystać w naszym kodowaniu.

End Property w VBA

„Koniec” to właściwość, której używamy w VBA, aby poruszać się w sugerowanym kierunku. Typowym przykładem kierunku jest przejście z aktywnej komórki do ostatnio używanej komórki lub ostatniej komórki wejściowej w poziomie i w pionie w arkuszu.

Na przykład przypomnijmy sobie o tym w arkuszu. Spójrz na poniższy obrazek.

W tej chwili jesteśmy w komórce A1.

Jeśli chcemy przejść do ostatnio używanej komórki w poziomie, używamy klawisza skrótu programu Excel Ctrl + Strzałka w prawo, przeniesie nas to poziomo do ostatnio używanej komórki.

Podobnie, jeśli chcemy przejść do ostatnio używanej komórki w dół lub w pionie, wciskamy klawisz skrótu Ctrl + Strzałka w dół.

Aby przejść od lewej do prawej, wciskamy Ctrl + Strzałka w lewo, aby przejść od dołu do góry, wciskamy Ctrl + Strzałka w górę.

Podobną rzecz można zrobić w VBA, ale nie za pomocą klawisza Ctrl , zamiast tego musimy użyć słowa „End”.

Przykłady funkcji końca programu Excel VBA

Możesz pobrać ten szablon VBA End Excel tutaj - Szablon VBA End Excel

Przykład nr 1 - Użyj właściwości końcowej VBA, aby przenieść się w arkuszu

Przyjrzyjmy się, jak używać programu Excel VBA End do poruszania się po arkuszu. Najpierw musimy zdecydować, którą komórkę musimy przenieść. Ok, powiedzmy, że musimy przenieść się z komórki A1, więc odnieś się do komórki za pomocą obiektu VBA Range.

Kod:

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

Umieść kropkę (.), Aby wyświetlić listę IntelliSense. Wybierz z listy właściwość VBA „Koniec”.

Kod:

 Sub End_Example1 () Range („A1”). End End Sub 

Po wybraniu właściwości końcowej otwórz nawias.

Kod:

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

Gdy tylko otworzysz nawias, zobaczymy wszystkie dostępne opcje z właściwością „End”. Wybierz „xlToRight”, aby przejść z komórki A1 do ostatnio używanej komórki w poziomie.

Kod:

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

Po przejściu do ostatniej komórki musimy wybrać, co mamy zrobić. Umieść kropkę (.), Aby wyświetlić listę IntelliSense.

Kod:

Sub End_Example1 () Range („A1”). End (xlToRight). Napis końcowy

Wybierz metodę „Wybierz” z listy IntelliSense.

Kod:

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

Będzie to używane od komórki A1 do ostatnio używanej komórki w poziomie.

Podobnie użyj pozostałych trzech opcji, aby przejść w prawo, w lewo, w dół, w górę.

Aby przejść w prawo z komórki A1.

Kod:

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

Aby przejść w dół z komórki A1.

Kod:

 Sub End_Example1 () Range („A1”). End (xlDown) .Wybierz End Sub 

Aby przejść w górę z komórki A5.

Kod:

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

Aby przejść w lewo od komórki D1.

Kod:

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

Wszystkie powyższe kody są przykładowymi przykładami użycia właściwości „End” do poruszania się po arkuszu.

Teraz zobaczymy, jak wybrać zakresy za pomocą właściwości „End”.

Przykład 2 - wybór przy użyciu właściwości End

Musimy zakończyć właściwość, aby wybrać zakres komórek w arkuszu. W tym przykładzie rozważ poniższe dane.

Wybierz A1 do ostatnio używanej komórki

Aby zaznaczyć komórki od A1 do ostatnio używanej komórki w poziomie, najpierw wspomnij komórkę A1 w obiekcie Range.

Kod:

 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 “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 

Example #3 – Select Right to Left, Right to Bottom, & Top

We have seen how to select horizontally & vertically. To select both vertically and horizontally we need to use two “End” properties. To select the data from A1 to D5, we need to use the below code.

Code:

 Sub End_Example3() Range("A1", Range("A1").End(xlDown).End(xlToRight)).Select 'To from cell A1 to last use cell downwards & rightwards End Sub 

This will select the complete range like the below.

Like this, we can use the VBA “End” Function property to select a range of cells.