Boa tarde galera,
To com essa dúvida.
Segue planilha
Preciso que, quando eu selecione a sigla, ela já puxe a descrição.
Quem pode ajudar?
vlw
doidoDmais
Membro Senior
Registrado
233 Mensagens
6 Curtidas
- Home
- >
- Fórum
- >
- Windows, Softwa...
- >
- Suítes de escri...
- >
- Resolvido - Procv VBA
Basole
Geek
Registrado
945 Mensagens
596 Curtidas
Anexos
Click em Curtir se a resposta foi útil. 
Dê retorno por favor. Se resolveu, Altere o Titulo como [ Resolvido ]
Dê retorno por favor. Se resolveu, 
Altere o Titulo como [ Resolvido ] 
doidoDmais
Membro Senior
Registrado
233 Mensagens
6 Curtidas
Obrigado pela atenção. Se souber em vba agradeço.
vlw
De doido todo mundo tem um pouco!
doidoDmais
Membro Senior
Registrado
233 Mensagens
6 Curtidas
De doido todo mundo tem um pouco!
zinhovba
Novo Membro
Registrado
6 Mensagens
0 Curtidas
Favor indicar as postagens cruzadas.
http://profwillianexcel.forumeiros.com/t805-funcao-procv-vba
Att
doidoDmais
Membro Senior
Registrado
233 Mensagens
6 Curtidas
Ficou assim:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Dim lastrow As Long
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
Application.ScreenUpdating = 0
With Worksheets("Plan1")
[C2].Formula = "=IFERROR(VLOOKUP(B2,$G$2:$H$7,2,0),"""")"
.Range("C2").AutoFill Destination:=Range("C2:C" & lastrow)
.Range("C2:C9000").Value = .Range("C2:C9000").Value
End With
Application.ScreenUpdating = 1
End If
End Sub
Flw e obrigado a todos que ajudaram de alguma maneira.
De doido todo mundo tem um pouco!
