Função final do VBA - Usando End Property em VBA (com exemplos)

Índice

Função final em VBA

Função final em VBA

End é uma instrução em VBA que tem várias formas em aplicativos VBA, uma instrução End simples pode ser colocada em qualquer lugar do código e irá parar automaticamente a execução do código, a instrução end é usada em muitos procedimentos, como encerrar o subprocedimento ou finalizar qualquer função de loop como End if.

Para tudo existe um fim e no VBA não é diferente. Você deve ter visto esta palavra “ Fim ” em todos os códigos em seu VBA. Podemos terminar em “End Sub,” “End Function,” “End If.” Estes são comuns, pois sabemos que cada Fim sugere o fim do procedimento. Essas instruções VBA End não requerem nenhuma introdução especial porque estamos familiarizados com elas em nossa codificação VBA.

Além do "Fim" acima, temos uma propriedade, "Fim" no VBA. Neste artigo, mostraremos essa propriedade e como usá-la em nossa codificação.

Fim da propriedade no VBA

“Fim” é a propriedade que usamos no VBA para mover na direção sugerida. O exemplo típico de direção é mover da célula ativa para a última célula usada ou para a última célula de entrada horizontal e verticalmente na planilha.

Por exemplo, vamos relembrar isso com uma planilha. Veja a imagem abaixo.

No momento, estamos na célula A1.

Se quisermos ir para a última célula usada horizontalmente, usamos a tecla de atalho do excel Ctrl + Seta para a direita, e ela nos levará para a última célula usada horizontalmente.

Da mesma forma, se quisermos ir para a última célula usada para baixo ou verticalmente, pressionamos a tecla de atalho Ctrl + Seta para Baixo.

Então, para mover da esquerda para a direita, pressionamos Ctrl + Seta para a Esquerda. Para mover de baixo para cima, pressionamos Ctrl + Seta para cima.

Uma coisa semelhante pode ser feita no VBA, mas não usando a tecla Ctrl . Em vez disso, precisamos usar a palavra “Fim”.

Exemplos de função final do Excel VBA

Exemplo # 1 - Use a propriedade final do VBA para mover na planilha

Vejamos como usar o Excel VBA End para mover na planilha. Primeiro, precisamos decidir qual célula precisamos mover. Ok, digamos que precisamos mover da célula A1, portanto, refira a célula usando o objeto VBA Range.

Código:

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

Coloque um ponto (.) Para ver a lista do IntelliSense. Selecione a propriedade VBA “End” na lista.

Código:

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

Uma vez que a propriedade final selecionada abra parênteses.

Código:

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

Assim que você abrir o parêntese, podemos ver todas as opções disponíveis com a propriedade “Fim”. Selecione “xlToRight” para mover da célula A1 para a última célula usada horizontalmente.

Código:

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

Depois de passar para a última célula, precisamos selecionar o que precisamos fazer. Coloque um ponto (.) Para ver a lista do IntelliSense.

Código:

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

Escolha o método “Selecionar” na lista do IntelliSense.

Código:

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

Isso fará uso da célula A1 para as últimas células usadas horizontalmente.

Da mesma forma, use as outras três opções para mover para a direita, esquerda, para baixo, para cima.

Para mover para a direita da célula A1.

Código:

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

Para mover para baixo da célula A1.

Código:

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

Para mover para cima da célula A5.

Código:

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

Para mover para a esquerda da célula D1.

Código:

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

Todos os códigos acima são exemplos de como usar a propriedade “End” para mover na planilha.

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

Exemplo # 3 - Selecione da direita para a esquerda, da direita para a parte inferior e superior

Vimos como selecionar horizontal e verticalmente. Para selecionar vertical e horizontalmente, precisamos usar duas propriedades “End”. Para selecionar os dados de A1 a D5, precisamos usar o código abaixo.

Código:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown) .End (xlToRight)). Selecione 'To da célula A1 para usar a última célula para baixo e para a direita End Sub

Isso selecionará a gama completa como a seguir.