Como remover todos os caracteres após o primeiro / último espaço das células no Excel?
Por exemplo, se você deseja remover todos os caracteres após o último espaço das células, como poderia fazer isso facilmente no Excel? E se remover todos os caracteres após o primeiro espaço? Existem algumas soluções para você:
- Remova todos os caracteres após o primeiro / último espaço com fórmula
- Remova todos os caracteres após o primeiro espaço com o Kutools para Excel
- Remova todos os caracteres após o último espaço com a função definida pelo usuário
Remova todos os caracteres após o primeiro / último espaço com fórmulas
Esta seção apresentará fórmulas para remover todos os caracteres após o primeiro ou o último espaço no Excel. Faça o seguinte:
Remova todos os caracteres após o último espaço
Selecione uma célula em branco, insira a fórmula =LEFT(A2,FIND("^^",SUBSTITUTE(A2," ","^^",LEN(A2)-LEN(SUBSTITUTE(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 conforme necessário.
A fórmula é muito complicada para lembrar? Salve a fórmula como uma entrada de texto automático para reutilizá-la com apenas um clique no futuro! Leia mais ... Teste Grátis |
E então você verá todos os caracteres após o último espaço ser removido em cada célula. Veja a imagem:
Remova todos os caracteres após o primeiro espaço
Selecione uma célula em branco, insira a fórmula = ESQUERDA (A2, ENCONTRAR ("", 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 baixo até o intervalo conforme necessário.
Remova todos os caracteres após o primeiro espaço com o Kutools para Excel
Este método apresentará o Kutools para Excel Nomes de divisão utilitário para remover rapidamente todos os caracteres após o primeiro espaço das células no Excel.
1. Selecione o intervalo em que você removerá todos os caracteres após o primeiro espaço de cada célula e clique em Kutools > Texto > Nomes de divisão. Veja a imagem:
2. Na caixa de diálogo de abertura de Split Names, marque apenas o Nome opção, 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 Split Names e clique no botão OK botão.
E agora você verá que todos os caracteres são removidos após o primeiro espaço de cada célula. Veja a imagem:
Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Get It Now
Remova todos os caracteres após o último espaço com a função definida pelo usuário
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. Faça o seguinte:
1. Pressione outro + F11 simultaneamente para abrir a janela Microsoft Visual Basic for Applications.
2. Clique inserção > Móduloe, em seguida, copie e cole o código a seguir na nova janela do módulo.
VBA: remove 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
3. Salve a função definida pelo usuário e feche a janela Microsoft Visual Basic for Applications. 4. Selecione uma célula em branco e 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 conforme necessário.
E então você verá todos os caracteres após o último espaço ser removido de cada célula. Veja a imagem:
Demo
Artigos relacionados:
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!