Procv em VBA não funciona

[wafa_sapo]

Olá, estou quebrando a cabeça com esta função no VBA e gostaria da ajuda dos senhores, ja procurei em varios tópicos, sites e nada.... mas vamos para o problema:

Tenho uma planinha em VBA quando eu a executo, algumas informações já vem pré definidas como nº sequencial, data e hota e os editáveis o meu problema esta na caixa de seleção "Compomente" (comboBox2) onde eu seleciono o nome de uma peça e gostaria que na caixa abaixo (TextBox8) aparecece o nº da peça, segue a planilha para qualquer dúvida:

 

Valeu galera.....

Inspeção.xls

[Visitante]

Olá, sapo.

 

Sugiro que você disponibilize um arquivo em que o Projeto VBA não esteja protegido.

 

[wafa_sapo]

Me desculpe senhores segue a planilha desprotegida.

 

att

Inspeção.xls

[Visitante]

Substitua esta linha

TextBox8 = Application.WorksheetFunction.VLookup(CDbl(ComboBox2), Sheets("Componentes!a2:a232"), 2, 0)

 

por esta

TextBox8 = Application.VLookup(ComboBox2, Range("Componentes!A2:B232"), 2, 0)

 

[wafa_sapo]

Cara uma coisa tão simples e eu me batendo a dias..... muito obrigado.

 

 

Valeu.