Guru do Excel e Power BI

Sou iniciante no Excel VBA e depois de pesquisar bastante pensei ter conseguido fazer um código para que após duplo click em uma listbox, alguns campos de uma segunda planilha ( a primeira, PlanilhaDados, alimenta a listbox) fossem automaticamente preenchidos, usando também uma textbox que ia fornecendo as opções de consulta à medida que os caracteres fossem digitados, contudo, na hora de executar o código sempre dá erro em tempo de execução '-2147467259(800040005)...Algém poderia me ajudar em identificar onde está o erro nesse código?
Obs: para facilitar, anexo a planilha!

Selecione sua listiview, va em rowsource e elimine/limpe a referencia a range da planilha

Bom dia.
Veja se o que fiz lhe ajuda.
At
gfranco.