Como usar activecell em vba no excel?

No VBA, célula ativa é uma propriedade que representa a célula que está ativa no momento. Quando você seleciona uma célula ou navega até uma célula e esta caixa verde cobre essa célula, você pode usar a propriedade ACTIVECELL para se referir a essa célula no código VBA. Existem propriedades e métodos que acompanham isso.

Usar propriedade de célula ativa

1. Digite a palavra-chave “ActiveCell”.
2. Digite um ponto final (.) para obter as propriedades e métodos da lista.
3. Selecione a propriedade ou método que deseja usar.
4. Execute o código para realizar a atividade na célula ativa.

Pontos importantes

• Quando você usa a propriedade de célula ativa, o VBA se refere à célula ativa na planilha ativa da pasta de trabalho ativa , independentemente de quantas pastas de trabalho estão abertas no momento.
• ActiveCell é, em última análise, uma célula com todas as propriedades e métodos de uma célula normal.

Ative uma célula do intervalo selecionado

Para ativar uma célula usando código VBA, você pode usar um método “Ativar” e um método “Selecionar” de duas maneiras.

 Sub vba_activecell() 'select and entire range Range("A1:A10").Select 'select the cell A3 from the selected range Range("A3").Activate 'clears everything from the active cell ActiveCell.Clear End Sub

O código acima, em primeiro lugar, seleciona o intervalo A1:A10, depois ativa a célula A3 a partir daí e no final limpa tudo da célula ativa, ou seja, A3.

Valor de retorno da célula ativa

O código a seguir retorna o valor da célula ativa usando uma caixa de mensagem .

 MsgBox ActiveCell.Value

Ou se quiser obter o valor da célula ativa e colá-lo em uma célula separada.

 Range("A1") = ActiveCell.Value

Definir célula ativa como uma variável

Você também pode definir a célula ativa para a variável , como no exemplo a seguir.

 Sub vba_activecell() 'declares the variable as range Dim myCell As Range 'set active cell to the variable Set myCell = ActiveCell 'enter value in the active cell myCell.Value = Done End Sub

Obtenha o número da linha e da coluna do ActiveCell

Com a célula ativa, há uma propriedade de linha e coluna que você pode usar para obter o número da linha e da coluna da célula ativa.

 MsgBox ActiveCell.Row MsgBox ActiveCell.Column

Obtenha o endereço da célula ativa

Você pode usar a propriedade address para obter o endereço da célula ativa.

 MsgBox ActiveCell.Address

Ao executar o código acima, ele mostra uma caixa de mensagem com o endereço da célula ativa da planilha ativa da pasta de trabalho ativa (como mencionei anteriormente).

Mover da célula ativa usando deslocamento

Com a propriedade offset, você pode mover para uma célula que esteja a várias linhas e colunas de distância da célula ativa.

 ActiveCell.Offset(2, 2).Select

Selecione um intervalo na célula ativa

E você também pode selecionar um intervalo da célula ativa.

 Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(5, 5)).Select