Meu caro, o valor que estava retornando do TextBox (txt_transportadora) era do tipo String(Texto), e na função VLookup é esperado um valor Numério.
Usar o método Val() para converter de Texto parta Numero.

Private Sub txt_transportadora_AfterUpdate()

Dim intervalo As Range
Dim Texto As String
Dim pesqueisa
Dim mensagem

codigo = txt_transportadora
Sheets("Plan1").Select
Set intervalo = Range("A1:B500")

On Error GoTo Erro

pesquisa = Application.WorksheetFunction.VLookup(Val(codigo), Intevalo, 2, False)

txt_transportadora = pesquisa
Exit Sub
Erro:
Texto = " Não Foi Localizado Nenhuma Transportadora com este Codigo..."
mensagem = MsgBox(Texto, vbOKOnly + vbInformation)
End Sub

Boa tarde Weslly,

Acho que não expliquei corretamente, na primeira planilha, a busca que preciso fazer e de parte do nome da transportadora e ela me mostrar o código, ou habilitar uma janela que eu possa visualizar as transportadora, quando estiver digitando, não sei se isso e possivel, uma vez que sera somente em partes.

Segue Anexo, Planilha Modificada

att.

Admaury,

Admaury, pela função PROCV não tem como retornar da forma que pretende.

Sugiro, utilizar uma das opções abaixo para ter o retorno que pretende :
Function Pesquisar InputBox e TextBox
viewtopic.php?t=2877&p=45646

Ou da forma que comentou, ao ir digitando :
Filtro Combox resultado em ListBox
viewtopic.php?f=10&t=8600

AUTO COMPLETAR TEXTBOX DIGITANDO QUALQUER PALAVRA
viewtopic.php?t=8012

Obs : Se o arquivo que anexou é o mesmo do primeiro post, não é necessário anexar novamente, assim ecomizamos espaço no Servidor, se for depois avisa que eu tiro um.

[]s

Mauro,

Tentei de varias formas, mas como nao tenho muito conhecimento em VBA, não consegui, gostaria muito que me ajuda-se e finaliza-la, montei a estrutura no geral e mais ous menos o que eu gostaria, sobre a aba de pesquisa de transportadora e clientes,

se puder me ajudar fico agradecido,

segue anexo a planilha com a sugestão.

Admaury Pereira

Veja se seria isto:

[]s

Muito obrigado Mauro, e aos demais colegas, muito agradecido.

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.