Notifications
Clear all

Inserir valores na célula clicando em outra

2 Posts
2 Usuários
0 Reactions
509 Visualizações
(@nelson28)
Posts: 1
New Member
Topic starter
 

Olá amigos,

peço ajuda a vocês para o seguinte problema:

Uma das colunas da planilha contém nomes de pessoas: K2 a K20

eu quero clicar em uma das células deste intervalo para que o nome apareça na célula T2

ex: clico em K4 = Antonio e este nome aparece na T2

depois clico em K9 e o nome é atualizado em T2

Isso é possível???

obrigado!

 
Postado : 12/12/2017 3:27 pm
xlarruda
(@xlarruda)
Posts: 732
Honorable Member
 

Acho que é isso o que quer...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Target.Column = 11 And Target.Value <> "" Then
[Plan1].Range("T2").Value = ActiveCell.Value
End If
If Target.Value = "" Then
[Plan1].Range("T2").Value = ""
End If
End Sub

Qualquer coisa me avise se não for

abrç!

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

Att.

André Arruda

 
Postado : 12/12/2017 3:34 pm