VBA End

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 para encerrar o subprocedimento ou terminar 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.

Propriedade final em 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, 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

Você pode baixar este modelo do VBA final do Excel aqui - modelo do VBA final do Excel

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

Vamos ver 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 

Depois de selecionar a propriedade final, abra parênteses.

Código:

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

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

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 levará o uso da célula A1 até a última célula usada 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) .Selecionar End Sub 

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

Agora veremos como selecionar os intervalos utilizando a propriedade “End”.

Exemplo # 2 - Seleção usando propriedade final

Precisamos finalizar a propriedade para selecionar o intervalo de células na planilha. Para este exemplo, considere os dados abaixo.

Selecione A1 para a última célula usada

Para selecionar as células de A1 até a última célula usada horizontalmente, primeiro mencione a célula A1 no objeto Range.

Código:

 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.