VBA-Endfunktion - Verwenden der End-Eigenschaft in VBA (mit Beispielen)

Endfunktion in VBA

End ist eine Anweisung in VBA, die in VBA-Anwendungen mehrere Formulare hat. Die einfache End-Anweisung kann an einer beliebigen Stelle im Code eingefügt werden und stoppt automatisch die Ausführung des Codes. Die end-Anweisung wird in vielen Verfahren verwendet, um die Unterprozedur zu beenden oder zu beenden jede Schleifenfunktion wie End if.

Für alles gibt es ein Ende, und in VBA ist es nicht anders. Sie müssen dieses Wort " Ende " in allen Codes in Ihrem VBA gesehen haben. Wir können in "End Sub", "End Function", "End If" enden. Diese sind häufig, da wir wissen, dass jedes Ende das Ende des Verfahrens vorschlägt. Diese VBA-End-Anweisungen erfordern keine spezielle Einführung, da wir sie in unserer VBA-Codierung kennen.

Abgesehen von dem oben genannten "Ende" haben wir eine Eigenschaft, "Ende" in VBA. In diesem Artikel werden wir Sie durch diese Eigenschaft führen und wie Sie sie in unserer Codierung verwenden.

Endeigenschaft in VBA

"Ende" ist die Eigenschaft, die wir in VBA verwenden, um uns in die vorgeschlagene Richtung zu bewegen. Das typische Richtungsbeispiel ist das horizontale und vertikale Verschieben von der aktiven Zelle zur zuletzt verwendeten Zelle oder zur letzten Eingabezelle im Arbeitsblatt.

Erinnern wir uns zum Beispiel mit einem Arbeitsblatt daran. Schauen Sie sich das Bild unten an.

Im Moment sind wir in der A1-Zelle.

Wenn Sie horizontal zur zuletzt verwendeten Zelle wechseln möchten, verwenden Sie die Excel-Tastenkombination Strg + Rechtspfeil, um horizontal zur zuletzt verwendeten Zelle zu gelangen.

Wenn Sie nach unten oder vertikal zur zuletzt verwendeten Zelle wechseln möchten, drücken Sie die Tastenkombination Strg + Abwärtspfeil.

Um von links nach rechts zu wechseln, drücken wir Strg + Pfeil nach links. Um von unten nach oben zu gelangen, drücken wir Strg + Aufwärtspfeil.

Ähnliches kann in VBA durchgeführt werden, jedoch nicht mit der Strg- Taste. Vielmehr müssen wir das Wort "Ende" verwenden.

Beispiele für die Excel VBA-Endfunktion

Beispiel 1 - Verwenden Sie die VBA-Endeigenschaft, um im Arbeitsblatt zu verschieben

Schauen wir uns an, wie Sie Excel VBA End verwenden, um das Blatt zu verschieben. Zuerst müssen wir entscheiden, welche Zelle wir bewegen müssen. Angenommen, wir müssen uns von der Zelle A1 entfernen. Verweisen Sie also mit dem VBA-Bereichsobjekt auf die Zelle.

Code:

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

Setzen Sie den Punkt (.) , Um die IntelliSense-Liste anzuzeigen. Wählen Sie die VBA-Eigenschaft "End" aus der Liste aus.

Code:

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

Sobald die Eigenschaft end ausgewählt ist, öffnen Sie die Klammer.

Code:

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

Sobald Sie die Klammer öffnen, werden alle verfügbaren Optionen mit der Eigenschaft "End" angezeigt. Wählen Sie „xlToRight“ , um horizontal von Zelle A1 zur zuletzt verwendeten Zelle zu wechseln.

Code:

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

Nachdem wir zur letzten Zelle gewechselt sind, müssen wir auswählen, was wir tun müssen. Setzen Sie den Punkt (.), Um die IntelliSense-Liste anzuzeigen.

Code:

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

Wählen Sie die Methode "Auswählen" aus der Liste "IntelliSense".

Code:

Sub End_Example1 () Range ("A1"). End (xlToRight). Wählen Sie End Sub

Dadurch wird Zelle A1 verwendet, um zuletzt verwendete Zellen horizontal zu verwenden.

Verwenden Sie in ähnlicher Weise die anderen drei Optionen, um sich nach rechts, links, unten und oben zu bewegen.

So bewegen Sie sich von Zelle A1 nach rechts.

Code:

Sub End_Example1 () Range ("A1"). End (xlToRight). Wählen Sie End Sub

So bewegen Sie sich von Zelle A1 nach unten

Code:

Sub End_Example1 () Range ("A1"). End (xlDown). Wählen Sie End Sub

So bewegen Sie sich von Zelle A5 nach oben

Code:

Sub End_Example1 () Range ("A5"). End (xlUp). Wählen Sie End Sub

Von Zelle D1 nach links gehen.

Code:

Sub End_Example1 () Range ("D1"). End (xlToLeft). Wählen Sie End Sub

Alle oben genannten Codes sind Beispielbeispiele für die Verwendung der Eigenschaft „End“ zum Verschieben im Arbeitsblatt.

Jetzt sehen wir, wie Sie die Bereiche mithilfe der Eigenschaft „End“ auswählen.

Beispiel 2 - Auswahl mit der End-Eigenschaft

Wir müssen die Eigenschaft beenden, um den Zellenbereich im Arbeitsblatt auszuwählen. Betrachten Sie für dieses Beispiel die folgenden Daten.

Wählen Sie A1 als zuletzt verwendete Zelle

Um die Zellen von A1 bis zur zuletzt verwendeten Zelle horizontal auszuwählen, erwähnen Sie zunächst die Zelle A1 im Bereich-Objekt.

Code:

Sub End_Example2 () Range ("A1", End Sub

Öffnen Sie für das zweite Argument ein weiteres Range-Objekt und erwähnen Sie die Zelle nur als A1.

Code:

Sub End_Example2 () Range ("A1", Range ("A1") End Sub

Schließen Sie nur eine Klammer und setzen Sie einen Punkt, um die Eigenschaft Excel VBA End auszuwählen.

Code:

Sub End_Example2 () Range ("A1", Range ("A1"). End (End Sub

Wählen Sie nun xlToRight und schließen Sie zwei Klammern.

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

Beispiel 3 - Wählen Sie von rechts nach links, von rechts nach unten und oben

Wir haben gesehen, wie man horizontal und vertikal auswählt. Um sowohl vertikal als auch horizontal auszuwählen, müssen zwei "End" -Eigenschaften verwendet werden. Um die Daten von A1 bis D5 auszuwählen, müssen wir den folgenden Code verwenden.

Code:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown) .End (xlToRight)). Wählen Sie 'To von Zelle A1, um die Zelle zuletzt nach unten und rechts zu verwenden. End Sub

Dadurch wird der gesamte Bereich wie folgt ausgewählt.

Auf diese Weise können wir die VBA-Eigenschaft „End“ verwenden, um einen Zellbereich auszuwählen.