Notifications
Clear all

Indicar a célula ativa

3 Posts
2 Usuários
0 Reactions
577 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde colegas.
Estou precisando de uma macro que me indique toda célula ativa em "A1".
Ex: Se eu selecionar a célula "B4" aparecer na célula "A1" o endereço "B4".
Não pode ser via MsgBox.

Se alguém souber, por favor ajuda.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/05/2018 10:12 am
xlarruda
(@xlarruda)
Posts: 732
Honorable Member
 

Segue:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then
Exit Sub
End If
[a1].Value = Target.Address(False, False)
End Sub

___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].

Att.

André Arruda

 
Postado : 03/05/2018 10:17 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Muito obrigado xlarruda, quebrou um galhão.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/05/2018 10:35 am