Início
Pscarpa 11/5/2017, 19:52Pessoal, estou com esse problema. Na hora que entro com o numero 006212102286777018 no txtbox, ele dá esse erro de erro de execução 6 estouro, porem a minha variavel já está como long
Dim intervalo As Range
Dim matricula As Long
Dim pesquisa
matricula = txt_matricula.Text
Sheets("Dados").Select
Set intervalo = Range("A2:B5000")
pesquisa = Application.WorksheetFunction.VLookup(matricula, intervalo, 2, False)
lbl_nome = pesquisa
alguem tem uma solução?
obrigado
Dim intervalo As Range
Dim matricula As Long
Dim pesquisa
matricula = txt_matricula.Text
Sheets("Dados").Select
Set intervalo = Range("A2:B5000")
pesquisa = Application.WorksheetFunction.VLookup(matricula, intervalo, 2, False)
lbl_nome = pesquisa
alguem tem uma solução?
obrigado
