Mover uma célula ativa duas linhas acima com VBA no Excel

Para mover uma célula ativa duas linhas para cima usando VBA (Visual Basic for Applications) no Excel, você pode utilizar o seguinte código:

Sub MoverCelulaDuasLinhasParaCima()
ActiveCell.Offset(-2, 0).Select
End Sub

Nesse código, a função Offset(-2, 0) move a célula ativa duas linhas para cima (usando o valor -2 para a coordenada de linha e 0 para a coordenada de coluna). Certifique-se de que a célula que você deseja mover esteja ativa antes de executar esse código.

Mover uma célula ativa duas linhas acima com VBA

Para adicionar e executar esse código no Excel, siga estas etapas:

  • Pressione ALT + F11 para abrir o Editor VBA.
  • Clique em "Inserir" no menu superior e escolha "Módulo".
  • Cole o código fornecido no módulo em branco.
  • Feche o Editor VBA. Isso vai criar um comando mover uma célula.
  • Pressione ALT + F8 para abrir a janela "Macro".
  • Selecione "MoverCelulaDuasLinhasParaCima" na lista de macros.
  • Clique em "Executar".

Isso vai mover a célula ativa duas linhas para cima. Lembre-se de que o uso de seleções ativas e offsets pode não ser a melhor prática em programação VBA, pois pode levar a problemas de legibilidade e manutenção. Em um cenário real, você provavelmente quereria usar referências de células específicas ou variáveis para evitar dependência da seleção ativa.

Se você deseja aplicar mais códigos VBA em suas planilhas, seleciona a categoria VBA neste artigo para ver outras formas de trabalhar com o Visual Basic Applications no Excel. Você ainda pode criar macros sem a necessidade de criar códigos de programação, como esse para mover uma célula.



Confira Estes Produtos Que Eu Recomendo

Compre Planilhas de Excel

Confira os Preços

Climatizador de Ar

Condira os Preços

Notebook DELL Inspiron

Confira os Preços

Celular da Marca Xiaomi

Confira os Preços

Notebook Lenovo IdeaPad

Confira Os Preços

Smartphone Samsung Galaxy

Confira os Preços

Aspirador de Pó Robô

Confira os Preços

Os Melhores Ventiladores

Confira os Preços

Notebook Gamer

Confira os Preços

Materiais para Escritórios

Confira os Preços

Impressora Multifuncional de Tinta

Confira os Preços

Smart TV Samsung de 32 a 70

Confira os Preços

Edivaldo
Edivaldo

Edivaldo. Analista de funções e fórmulas de Excel, adoro fazer planilhas e compartilhar meus conhecimentos com as pessoas. Seja bem-vindo ao tudo Excel, onde você aprende de graça e tira suas dúvidas.

Se você tem alguma dúvida, escreva seu comentário abaixo:

Deixe um Comentário

Tudo Excel
Logo