Boa noite,
Estou fazendo uma planilha de orçamentose tenho uma lista com com mais de 10 mil linhas, achei uma função para preencher um listbox de acordo com o que é digitado num textbox, a macro abaixo funcionou para uma parametro, porem quando digito o segundo parametro nao funciona, a ideia era funcionar com varios parametros.
ex:
procurar todos as celulas que contenham parafuso - sextavado - preto

A minha ideia seria a cada espaço digitado criar um termo e concatenar na pesquisa, não sei se seria a melhor ideia.

For i = 4 To 10000

If UCase(Cells(i, 10).Value) Like UCase("*" & TextBox1.Value & "*") Then (teria que concatenar outro termo ex: ("*" & TextBox1.Value & "*" & "*" parametro2 "*")
ListBox1.AddItem Cells(i, 10).Value
End If

Next