Boa noite,
Fiz uma macro com o metodo find para localizar todas as celulas que tenham as palavras chave digitadas numa textbox e cria uma listbox com os resultados, porém do jeito que eu fiz o metodo só funciona se as palavras forem digitas na ordem correta, gostaria que a macro encontrasse independente da ordem que fossem digitas na textbox.
segue o trecho da macro que faz a pesquisa.

PALAVRA_CHAVE = Split(TEXTBOX_VALOR)
ReDim Preserve PALAVRA_CHAVE(10) 'aceita até 10 palavras chave

With Range(Cells(PRIMEIRA_LINHA, COLUNA), Cells(ULTIMA_LINHA, COLUNA))

Set C = .Find("*" & PALAVRA_CHAVE(0) & "*" & "*" & PALAVRA_CHAVE(1) & "*" _
& PALAVRA_CHAVE(2) & "*" & "*" & PALAVRA_CHAVE(3) & "*" _
& PALAVRA_CHAVE(4) & "*" & "*" & PALAVRA_CHAVE(5) & "*" _
& PALAVRA_CHAVE(5) & "*" & "*" & PALAVRA_CHAVE(6) & "*" _
& PALAVRA_CHAVE(8) & "*" & "*" & PALAVRA_CHAVE(7) & "*" _
& PALAVRA_CHAVE(10) & "*", LookIn:=xlValues, LOOKAT:=xlPart)