Boa noite Araujors!

Abri a sua planilha e fiz o teste. Realmente trava mesmo.
O que percebi é que se ficar apenas um registro ele trava. Se tiver dois ou mais registro e fechar e abrir o Form novamente ele não trava.
Não sei muita coisa em VBA ainda, mais dou alguns pitaco. rsrs
Infelizmente não analisei os códigos pq agora é hora de fazer a criança dormir.
Amanhã analisarei se caso algum companheiro do fórum não resolver primeiro né!!!

Boa noite!!!

Att,

Boa noite Araujors,

Cara, somente mexi no código "UserForm_Initialize" e "PovoarLista"
Acrescentei o botão de fechar também.

Vê se ajuda.

Qualquer coisa da o grito.
Abraço

Muito bom, funcionou tudo mas agora ta dando uns erros de variável não declarada, eu consigo fazer tudo direitinho com listview mas é que la no serviço ta bloqueado os pcs dai tem que ser no listbox mesmo, por isso to me perdendo todo, mas cara o resto funcionou tudo direitinho segue imagem, obrigado.

Boa noite Araujors,

Cara, nessa parte aí não mexi não... (e na verdade nem mesmo realizei muitos testes).

Acrescenta isso logo abaixo do "Private sub...."
Dim keycode As Long

Vai fazendo os testes aí e fala.

Qualquer coisa da o grito.
Abraço

Oi Bernardo, funcionou sim mas quando eu ensiro um código ele passa normal, mas quando tento inserir novamente nao acontece nada e mesmo assim adiciona linha em branco na listbox.

Boa noite Araujors,

Cara, vê se ajuda. Dei uma "melhoradinha" nos códigos, mas alguns preferi não mexer, pois tiraria muita coisa ali e não sei muito bem a funcionalidade e real utilidade da planilha, então poderia tirar alguma coisa que você precise.

Não entendi muito bem. Onde vai esse código? Qual a limitação dele? Algumas coisas eu realmente não entendi e não mexi também pois não sei até onde a planilha vai.

Qualquer coisa da o grito.
Abraço

Código abaixo remove item selecionado da listbox, queria que também ele remove-se o item selecionado da planilha.
Eu usei a variável Rows(variavel).Delete funciona mas ... dai ele trava tudo quando inicia, essa minha duvida.

Dim resposta As Integer
resposta = MsgBox("Excluir?", vbYesNo, "Excluir")
If resposta = vbYes Then
ListBox1.RemoveItem (ListBox1.ListIndex)
Exit Sub
End If

If resposta = vbNo Then
Exit Sub
End If

Teste

Boa tarde!
Reinaldo perfeito amigo cara isso mesmo que eu precisava, mas ta dando um pequeno erro agora pois quando eu coloco o código na textbox(txtCodigo) pela segunda vez como se tivesse inserindo um mesmo código da erro pq ele não faz o Vlookup do (txtCodigo) para o SKU e nem faz o extrair texto na planilha para trazer a informação para a textbox2 que seria o lote do item só se eu fechar e abrir o userform novamente.
E quando ele chega no textbox2 ele era pra dar um "tab" sozinho e já ir pro txtCodigo novamente.

Mas cara referente ao excluir muito perfeito!Se puder me dar mais essa força te agradeço mesmo.

? - alguem tem uma dica!

Sinceramente não entendi o que deseja.
Porem segue com alteração.