Silva,
Com base no teu outro tópico, em que vc quer eliminar as palavras átonas (DE, DOS etc.), eu refiz a fórmula.
Segue o mesmo porém do outro tópico, se a palavra tiver até 3 caracteres, vai ser desconsiderada. Espero que ninguém tenha sobrenome com 3 letras. Experimente:
=EXT.TEXTO(A1;PROCURAR("- ";A1)+2;PROCURAR("@";SUBSTITUIR(A1;" "; "@";3))-(PROCURAR("- ";A1)+1))&SE(ÉERROS(PROCURAR("@";SUBSTITUIR(A1;" "; "@";4)));EXT.TEXTO(A1;PROCURAR("@";SUBSTITUIR(A1;" "; "@";3))+1;SE(ÉERROS(PROCURAR("@";SUBSTITUIR(A1;" "; "@";4)));NÚM.CARACT(A1);PROCURAR("@";SUBSTITUIR(A1;" "; "@";4))-PROCURAR("@";SUBSTITUIR(A1;" "; "@";3)))-1);SE(PROCURAR("@";SUBSTITUIR(A1;" "; "@";4))-PROCURAR("@";SUBSTITUIR(A1;" "; "@";3))<=4;EXT.TEXTO(A1;PROCURAR("@";SUBSTITUIR(A1;" "; "@";4))+1;SE(ÉERROS(PROCURAR("@";SUBSTITUIR(A1;" "; "@";5)));NÚM.CARACT(A1);PROCURAR("@";SUBSTITUIR(A1;" "; "@";5))-PROCURAR("@";SUBSTITUIR(A1;" "; "@";4)))-1);EXT.TEXTO(A1;PROCURAR("@";SUBSTITUIR(A1;" "; "@";3))+1;SE(ÉERROS(PROCURAR("@";SUBSTITUIR(A1;" "; "@";4)));NÚM.CARACT(A1);PROCURAR("@";SUBSTITUIR(A1;" "; "@";4))-PROCURAR("@";SUBSTITUIR(A1;" "; "@";3)))-1)))
Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.
Gilmar
Postado : 23/05/2014 7:20 pm