Como extrair a primeira / última / enésima palavra de uma string de texto no Excel?

Se você precisa extrair a primeira palavra de uma lista de strings de texto, as seguintes fórmulas podem ajudá-lo.

Para extrair a primeira palavra, insira a fórmula abaixo em uma célula em branco e, em seguida, arraste a alça de preenchimento automático desta célula para o intervalo necessário.

=SE(ÉERRO(PROCURAR(" ";A2));"";ESQUERDA(A2;PROCURAR(" ";A2)-1))

Para extrair a última palavra de cada célula, aplique esta fórmula:

=SE(ÉERRO(PROCURAR(" ";A2));"";DIREITA(A2;NÚM.CARACT(A2)-PROCURAR("*";SUBSTITUIR(A2;" ";"*";NÚM.CARACT(A2)-NÚM.CARACT(SUBSTITUIR(A2;" ";""))))))

E agora você verá que a primeira ou a última palavra foi extraída de cada célula.

Notas: Nas fórmulas acima, A2 indica a célula da qual você extrairá a primeira ou a última palavra.

Difícil memorizar fórmulas longas e complicadas? Ferramenta incrível ajuda você a extrair a enésima Palavra com apenas alguns cliques!

As fórmulas longas acima só conseguem extrair a primeira e a última palavra, mas serão inúteis para extrair a enésima palavra especificada, como a segunda palavra, a sexta palavra, etc. Mesmo que você consiga criar fórmulas para resolver o problema, elas devem ser muito complexas para serem memorizadas e aplicadas. Aqui, recomenda-se o recurso Extrair a N-ésima palavra de uma célula do Kutools para Excel, e ele ajudará você a extrair a enésima palavra da forma mais fácil possível!

Se você deseja extrair a segunda, terceira ou qualquer enésima palavra da string de texto, pode criar uma função definida pelo usuário para lidar com isso.

1. Pressione e segure as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o código a seguir na janela Módulo.

Function FindWord(Source As String, Position As Integer)
'Update 20131202
Dim arr() As String
arr = VBA.Split(Source, " ")
xCount = UBound(arr)
If xCount < 1 Or (Position - 1) > xCount Or Position < 0 Then
    FindWord = ""
Else
    FindWord = arr(Position - 1)
End If
End Function

3. Em seguida, salve o código. Neste exemplo, vou obter a terceira palavra da string, então digite esta fórmula =findword(A2;3) em uma célula em branco B2, e depois arraste a alça de preenchimento automático desta célula para o intervalo necessário. Veja a captura de tela:

Nota: Na fórmula acima, A2 é a célula de onde você quer extrair a palavra, o número 3 indica a terceira palavra na string que você irá extrair, e você pode alterá-los conforme necessário.

Este método introduzirá o utilitário Dividir Células do Kutools para Excel para extrair cada palavra das células de string de texto e, em seguida, listar as palavras extraídas horizontalmente ou verticalmente, dependendo da sua necessidade.

1. Selecione as células de string de texto das quais você extrairá suas palavras e clique em Kutools > Mesclar & Dividir > Dividir Células.

2. Na caixa de diálogo Dividir Células aberta, especifique o tipo de divisão na seção Tipo seção, marque a opção Espaço opção na seção Especificar um separador seção, e clique no botão Ok botão. Veja a captura de tela:

3. Agora especifique o intervalo de destino onde você colocará as palavras extraídas e clique no botão OK

Se você marcou a opção Dividir em Colunas na caixa de diálogo Dividir Células acima, cada palavra é extraída de cada string de texto e listada verticalmente.

Se você marcou a opção Dividir em Linhas na caixa de diálogo Dividir Células acima, cada palavra é extraída de cada string de texto e listada horizontalmente.

Se você instalou o Kutools para Excel, pode usar seu Assistente de Fórmulas > Extrair a N-ésima palavra de uma célula para extrair rapidamente a enésima palavra da célula especificada facilmente.

1. Selecione a célula onde você colocará a palavra extraída e clique em Kutools > Assistente de Fórmulas > Assistente de Fórmulas para habilitar esse recurso.

2. Na caixa de diálogo Assistente de Fórmulas, faça o seguinte:
(1) Selecione Texto do menu suspenso Tipo de Fórmula lista suspensa;
(2) Clique para destacar Extrair a N-ésima palavra de uma célula na seção Escolha uma fórmula caixa de seleção;
(3) No campo Célula especifique a célula da qual você extrairá a palavra;
(4) No campo A Enésima especifique o número.

3. Clique no botão Ok botão. Se necessário, arraste a alça de preenchimento automático da célula da fórmula e copie a fórmula para outras células.