Ola ciutu... também trabalho com folha de pagamento e utilizo vários recursos do excel para montar n formulários. Como uma sugestão, simplificaria muito você utilizar o registro do empregado (RE) como código id para chamar as informações que você precisa. Em uma planilha você teria uma base com os dados (RE, NOME, RG) e no formulario que pretende preencher você lança o numero do RE e traz o nome e RG automaticamente. Reduziria tempo, pois, nao precisaria digitar o nome. É apenas uma sugestão.
Realmente, essa é a pratica mais comum em todas as areas quando se tem varios nomes de pessoas, empresas e ou produtos envolvido
isso pq nomes podem ser muito parecidos , existem maneiras de filtra conforme vai digitando mas mesmo assim é mais facil usar uma id própria
a macro pode ser ajustada para retornar as varias informações da tabela de dados
tipo
Sub procura()
Dim aray()
li = 7
lf = Cells(Rows.Count, "d").End(xlUp).Row
if li<lf then
aray = Range("i2:L" & Cells(Rows.Count, "i").End(xlUp).Row).Value2
' colunas tabela de empregados >> i=id ; j=nome ; k=RG ; L=cargo
For l2 = li To lf
For l = 1 To UBound(aray, 1)
If Cells(l2, "D").Value2 = aray(l, 1) Then 'verifica id
Cells(l2, "E").Value2 = aray(l, 2) ' coloca nome
Cells(l2, "F").Value2 = aray(l, 2) ' coloca RG
Cells(l2, "H").Value2 = aray(l, 2) ' coloca cargo
End If
Next
Next
end if
End Sub
Postado : 14/04/2016 7:37 pm