Boa tarde Amigos,
alguém pode me ajudar,estou com uma ficha criada em UserForm,essa ficha existem campos,como Referência,Nome,Data de Nascimento....etc..
Existe a possibilidade de usar Procv dentro desse UserForm,para quando eu digitar a Referência as outras informações já venham automaticamente.
att.,
Alexandre
Boa tarde Freitas.
Bom eu utilizou o comando Find, dessa maneira. Ele utiliza a mesma logica que o procv, sempre da esquerda pra direita. No exemplo abaixo a data esta na coluna A, por isso que o campo nome.value esta (0, 1) o ttelefone.value(0,2) e assim por diante.
Sheets("Cadastro").Activate
With Worksheets("Cadastro").Range("A:A")
Set a = .Find(DateValue(tdata.Value), LookIn:=xlValues, LookAt:=xlPart)
If (Not a Is Nothing) Then
a.activate
tnome.value = a.Offset(0, 1).Value
ttelefone.value = a.Offset(0, 2).Value
tidade.value = a.Offset(0, 3).Value
End If
freitasag,
Boa Tarde!
Segue minha sugestão.
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel