Como remover todos os caracteres após o primeiro/último espaço das células no Excel?

Esta seção apresentará fórmulas para remover todos os caracteres após o primeiro ou último espaço no Excel. Por favor, siga os passos abaixo:

Remover todos os caracteres após o último espaço

Selecione uma célula em branco, insira a fórmula =ESQUERDA(A2;LOCALIZAR("^^";SUBSTITUIR(A2;" ";"^^";NÚM.CARACT(A2)-NÚM.CARACT(SUBSTITUIR(A2;" ";""))))-1) (A2 é a célula onde você removerá todos os caracteres após o último espaço) e arraste a Alça de Preenchimento para o intervalo necessário.

A fórmula é muito complicada para lembrar? Salve a fórmula como uma entrada de AutoTexto para reutilizá-la com apenas um clique no futuro! Leia mais…     Teste grátis

E então você verá que todos os caracteres após o último espaço foram removidos em cada célula. Veja a captura de tela:

Remover todos os caracteres após o primeiro espaço

Selecione uma célula em branco, insira a fórmula =ESQUERDA(A2;LOCALIZAR(" ";A2)-1) (A2 é a célula onde você removerá todos os caracteres após o primeiro espaço) e arraste a Alça de Preenchimento para o intervalo necessário.

Este método introduzirá a utilidade Dividir Nomes do Kutools para Excel para remover rapidamente todos os caracteres após o primeiro espaço das células no Excel.

1. Selecione o intervalo do qual você removerá todos os caracteres após o primeiro espaço de cada célula e clique em Kutools > Texto > Dividir Nome. Veja a captura de tela:

2. Na caixa de diálogo Dividir Nome que se abre, marque apenas a opção Primeiro Nome e clique no botão Ok botão.

3. Em seguida, especifique a primeira célula do intervalo de destino na segunda caixa de diálogo Dividir Nome e clique no botão OK botão.

Agora você verá que todos os caracteres são removidos após o primeiro espaço de cada célula. Veja a captura de tela:

Você também pode aplicar uma Função Definida pelo Usuário para remover todos os caracteres após o último espaço das células no Excel. Por favor, siga os passos abaixo:

1. Pressione simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e copie e cole o seguinte código na nova janela Módulo.

VBA: Remover todos os caracteres após o último espaço no Excel

Function RemoveAfterLastSpace(Txt As String) As String
With CreateObject("VBScript.RegExp")
.Pattern = "\s+\w+$"
RemoveAfterLastSpace = .Replace(Txt, "")
End With
End Function

4. Selecione uma célula em branco, insira a fórmula =RemoveAfterLastSpace(A2) (A2 é a célula onde você removerá todos os caracteres após o último espaço) e arraste a Alça de Preenchimento para o intervalo necessário.

E então você verá que todos os caracteres após o último espaço foram removidos de cada célula. Veja a captura de tela:

Como remover letras de strings/números/células no Excel?

Como remover números de strings de texto no Excel?