Dicas: Macros para Excel - Movimente-se pela Planilha

Dicas: Macros para Excel - Movimente-se pela planilha

Tenho recebido muitos e-mails, atendido muitos clientes e conversado com muitas pessoas a respeito do Excel e VBA.

Algo que me chamou a atenção é a dificuldade que muitos usuários tem para conseguir criar pequenas macros que podem auxiliar muito em suas tarefas diárias.

Uma das coisas mais importantes é o deslocamento no Excel entre linhas e colunas para então, executar determinadas tarefas ou procedimentos. O código a seguir demonstra como isso pode ser feito.

Movimente-se pelas linhas do Excel

A macro a seguir fara um loop (repetição) pelas linhas da coluna 'a' até encontrar a última Linha utilizada.

Sub Deslocar_pelas_linhas()

    Dim i As Integer, uLinha As Integer 

    uLinha = Cells(Cells.Rows.Count, "a").End(xlUp).Row

    For i = 1 to uLinha

        ... Seu código aqui ...

    Next

End Sub

Movimente-se pelas colunas do Excel

A macro a seguir fara um loop (repetição) pelas colunas da linha '1' até encontrar a última Coluna utilizada.

Sub Deslocar_pelas_colunas()

    Dim i As Integer, uColuna As Integer 

    uColuna = Cells(1, Cells.Columns.Count).End(xlToLeft).Column

    For i = 1 to uColuna

        ... Seu código aqui ...

    Next

End Sub

Com estes dois códigos podemos encontrar facilmente qual é a:

• última Linha preenchida ou;
• última Coluna preenchida.

Encontrar a última célula preenchida no Excel

A macro a seguir encontra a última célula preenchida, como se combinasse os dois códigos (duas macros) acima, ou seja, encontrará a célula = ( ultima_Linha ; ultima_Coluna ) utilizada.

Sub Ultima_Celula_Preenchida()

    Dim i As Integer, uCelula As Integer

    uCelula = Cells(ActiveSheet.UsedRange.Rows.Count, 1).Row      'Linha 

   'uCelula = Cells(ActiveSheet.UsedRange.Columns.Count, 1).Row    'Coluna

                 For i = 1 to uCelula 

                     ... Seu código aqui ...

                 Next 

End Sub

Deixo aqui uma dica:

O entendimento e a utilização destas pequenas macros são essenciais não apenas para a utilização para aquilo que foi mencionado em seus  títulos. O mais importante é entendê-las e adaptá-las às inúmeras necessidades que surgirem. Na realidade isto é a base ou a estrutura do que vai fazer: Saber fazer a movimentação correta entre as células de uma ou mais planilhas.

Compartilhe com seus amigos.
Deixe também seu comentário e/ou sugestão pois ajudará a enriquecer o que estiver ou vier a ser publicado.


Obrigado pela visita e um grande abraço a todos !

Consultor e Professor: Ivair Claudio Ferrari.