Função para retornar a célula ativa do Excel

Objetivo: Função para retornar a célula atual do Excel.


Atenção: Atualização em: 28/03/2012, a função já existe no Excel é: =CÉL(“endereço”), agradeço ao Afonso pela colaboração, a parte que tem a atualização na mudança da célula continua valendo.

Estava precisando hoje uma função que retornasse o endereço da célula ativa do Excel, mas infelizmente desconheço função que faça isso automaticamente.

Desta forma desenvolvi uma função para extrair esta informação do Excel, em um próximo post vou demonstrar porque eu precisava desta função, por hora vamos apenas aprender como ela funciona.

1. No arquivo Excel no qual você vá usar a função para determinar a função atual insira um módulo no VBA e a função abaixo:

Private Function gfLinhaAtual() As String
    Application.Volatile

    gfLinhaAtual = ActiveCell.Address
End Function

2. Na planilha em que for utilizar a função para identificar a célula coloque o código abaixo:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Calculate
End Sub

A primeira função identifica o endereço da célula que estiver selecionada e a chamada do procedimento Worksheet_SelectionChange com o comando Calculate faz com que ao haver uma mudança de célula a função seja atualizada.

Esse foi a demonstração da Função para retornar a célula atual do Excel. Faça download abaixo:

Baixe a planilha

Abraço

Marcos Rieper


Marcos Rieper

Pai, marido, professor e consultor em Excel.

Obrigado por ler este artigo, este blog foi criado para difundir o conhecimento em Excel à todos.

Divulgamos novos artigos nas redes sociais, basta clicar nos ícones abaixo.

Excel não precisa ser complicado

Assine nossa newsletter e receba dicas práticas para dominar o excel