Excel: remover caracteres, palavras e números de sequências de texto

Se você possui uma lista de sequências de texto no Excel que contêm caracteres, números ou símbolos indesejados, pode ser necessário remover certos elementos com base em sua posição ou tipo. Seja para remover caracteres da esquerda, direita ou do meio, ou eliminar caracteres e números específicos, o Excel oferece diversas formas de limpar seus dados. Este tutorial apresenta métodos passo a passo utilizando fórmulas, Funções Definidas pelo Usuário (UDFs) e recursos internos para remover facilmente caracteres, palavras e números indesejados das suas sequências de texto.

Remover caracteres da esquerda, direita ou do meio das sequências de texto

Remover alguns caracteres da esquerda, direita ou do meio das sequências de texto em planilhas do Excel é uma tarefa comum para muitos de nós. Esta seção apresenta truques rápidos e fáceis para resolver essa tarefa.

1.1 Remover os primeiros n caracteres das sequências de texto

Se você precisa remover os primeiros n caracteres de uma lista de sequências de texto, os métodos a seguir podem ajudar.

Usando fórmulas

Normalmente, para excluir caracteres do início das sequências de texto, você pode usar a função SUBSTITUIR ou uma combinação das funções DIREITA e NÚM.CARACT.

Função SUBSTITUIR para remover os primeiros N caracteres:

• "texto": A sequência de texto da qual você deseja remover caracteres;
• "num_caract": O número de caracteres que você deseja remover.

Por exemplo, para remover os2 primeiros caracteres das células, utilize a fórmula abaixo e arraste a alça de preenchimento para copiar a fórmula para outras células, veja a imagem:

=REPLACE(A4, 1, 2, "")

Funções DIREITA e NÚM.CARACT para remover os primeiros N caracteres:

• "texto": A sequência de texto da qual você deseja remover caracteres;
• "num_caract": O número de caracteres que você deseja remover.

Para remover os2 primeiros caracteres das células, aplique a seguinte fórmula:

=RIGHT(A4,LEN(A4)-2)

Usando Função Definida pelo Usuário

Para remover os primeiros n caracteres das células, você também pode criar uma Função Definida pelo Usuário para resolver essa tarefa. Siga os passos abaixo:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover os primeiros n caracteres das sequências de texto

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3. Volte para a planilha, digite esta fórmula: "=removefirstx(A4,2)" em uma célula em branco e arraste a alça de preenchimento para baixo para obter os resultados conforme necessário, veja a imagem:

Observação: Nesta fórmula: "A4" é a célula da qual você deseja remover caracteres; O número "2" indica quantos caracteres você deseja remover do início da sequência de texto.

1.2 Remover os últimos n caracteres das sequências de texto

Para remover um número específico de caracteres do lado direito das sequências de texto, você também pode usar uma fórmula ou Função Definida pelo Usuário.

Usando fórmula

Para remover os últimos n caracteres das sequências de texto, você pode usar uma fórmula baseada nas funções ESQUERDA e NÚM.CARACT.

Funções ESQUERDA e NÚM.CARACT para remover os últimos N caracteres:

• "texto": A sequência de texto da qual você deseja remover caracteres;
• "num_caract": O número de caracteres que você deseja remover.

Para excluir3 caracteres do final das sequências de texto, utilize esta fórmula e arraste a alça de preenchimento para copiar a fórmula para outras células, veja a imagem:

=LEFT(A4, LEN(A4) - 3)

Usando Função Definida pelo Usuário

Uma Função Definida pelo Usuário também pode ajudar a remover os últimos n caracteres de uma lista de células. Siga estes passos:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover os últimos n caracteres das sequências de texto

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. Volte para a planilha, digite esta fórmula: "=removelastx(A4,3)" em uma célula em branco e arraste a alça de preenchimento para baixo para obter os resultados conforme necessário, veja a imagem:

Observação: Nesta fórmula: "A4" é a célula da qual você deseja remover caracteres; O número "3" indica quantos caracteres você deseja remover do final da sequência de texto.

1.3 Remover primeiros, últimos n caracteres ou caracteres de uma posição específica usando um recurso avançado

Pode ser difícil lembrar várias fórmulas para remover caracteres da esquerda, direita ou de uma posição específica das sequências de texto. O "Kutools para Excel" oferece um recurso avançado – "Remover caracteres em uma posição específica". Com essa ferramenta, você pode realizar essas tarefas com apenas alguns cliques, sem precisar memorizar fórmulas.

1. Selecione as células das quais deseja remover caracteres e clique em "Kutools" > "Texto" > "Remover caracteres em uma posição específica", veja a imagem:

2. Na caixa de diálogo "Remover caracteres em uma posição específica", faça as seguintes operações:

2.1 Remover os primeiros n caracteres das células:

• No campo "Números", digite quantos caracteres deseja remover das sequências. Neste exemplo, vou remover os2 primeiros caracteres.
• Selecione a opção "Começar da esquerda" na seção "Posição".
• Em seguida, clique no botão "Ok" ou "Aplicar" para obter o resultado conforme mostrado na imagem abaixo.

2.2 Remover os últimos n caracteres das células:

• No campo "Números", digite quantos caracteres deseja remover das sequências. Neste exemplo, vou remover os3 últimos caracteres.
• Selecione a opção "Começar da direita" na seção "Posição".
• Em seguida, clique no botão "Ok" ou "Aplicar" para obter o resultado conforme mostrado na imagem abaixo.

2.3 Remover n caracteres de uma posição específica das células:

Se você precisa remover um número específico de caracteres de uma determinada posição das sequências de texto, por exemplo, remover3 caracteres a partir do terceiro caractere da sequência.

• No campo "Números", digite quantos caracteres deseja remover das sequências. Neste exemplo, vou remover3 caracteres de uma posição específica.
• Selecione a opção "Personalizado" e digite o número a partir do qual deseja remover caracteres no campo da seção "Posição". Aqui, vou remover caracteres a partir do terceiro caractere.
• Em seguida, clique no botão "Ok" ou "Aplicar" para obter o resultado conforme mostrado na imagem abaixo.

1.4 Remover tanto os primeiros n quanto os últimos n caracteres das sequências de texto com fórmula

Quando você precisa remover caracteres de ambos os lados das sequências de texto no Excel, pode combinar as funções MÉDIA e NÚM.CARACT para criar uma fórmula para essa tarefa.

• "texto": A sequência de texto da qual você deseja remover caracteres;
• "caracteres_esquerda": O número de caracteres a remover da esquerda;
• "caracteres_direita": O número de caracteres a remover da direita.

Por exemplo, se você precisa remover os7 primeiros e os5 últimos caracteres das sequências de texto ao mesmo tempo, insira a seguinte fórmula em uma célula em branco:

=MID(A4, 7+1, LEN(A4) - (7+5))

Observação: Nesta fórmula: "A4" é a célula da qual você deseja remover caracteres; O número "7" é o número de caracteres que você deseja remover do lado esquerdo; O número "5" é o número de caracteres que você deseja remover do lado direito.

Depois, arraste a alça de preenchimento para baixo até onde deseja aplicar esta fórmula e você verá o resultado conforme mostrado na imagem abaixo:

Remover caracteres indesejados / especiais das sequências de texto

Ao importar dados de outro local para o Excel, muitos caracteres especiais ou indesejados podem ser colados na sua planilha. Para remover esses caracteres indesejados, como #@$%^&, espaços, números, caracteres não numéricos, quebras de linha, etc., esta seção apresenta métodos úteis para ajudar você.

2.1 Remover alguns caracteres especiais das sequências de texto

Se houver alguns caracteres especiais como %^&*() nas sequências de texto, para remover esse tipo de caractere, você pode aplicar os três truques abaixo.

Remover vários caracteres especiais das sequências de texto com a função SUBSTITUIR

Normalmente, no Excel, você pode aninhar várias funções SUBSTITUIR para trocar cada caractere específico por nada. A sintaxe genérica é:

• "célula_texto": A célula que contém a sequência de texto da qual você deseja remover caracteres especiais;
• "caract1, caract2, caract3": Os caracteres indesejados que você deseja remover.

Agora, copie ou digite a fórmula abaixo em uma célula em branco:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2, "#", ""), "&", ""), "*", ""), "%", "")

Depois, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula e todos os caracteres indesejados especificados serão removidos de uma vez, veja a imagem:

Dica: Se houver mais caracteres que você deseja remover, basta aninhar mais funções SUBSTITUIR dentro da fórmula.

Remover múltiplos caracteres especiais das sequências de texto com Função Definida pelo Usuário

As funções SUBSTITUIR aninhadas funcionam bem se houver poucos caracteres especiais para remover. No entanto, se você tiver dezenas de caracteres para remover, a fórmula pode ficar muito longa e difícil de gerenciar. Nesse caso, a seguinte Função Definida pelo Usuário pode ajudar você a concluir essa tarefa de forma rápida e fácil.

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover múltiplos caracteres especiais das sequências de texto

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. Depois, feche a janela de código e volte para a planilha, digite esta fórmula "=RemoveUnwantedChars(A2, $D$2)" em uma célula em branco onde deseja exibir o resultado e arraste a alça de preenchimento para baixo para obter os resultados conforme necessário, veja a imagem:

Observação: Na fórmula acima: "A2" é a célula da qual você deseja remover caracteres; "$D$2" contém os caracteres especiais que você gostaria de remover (você pode digitar quaisquer outros caracteres especiais que precisar).

Remover múltiplos caracteres especiais das sequências de texto usando um recurso incrível

Se você instalou o "Kutools para Excel", com o recurso "Excluir Caracteres", é possível remover todos os tipos de caracteres, como caracteres numéricos, alfabéticos, não imprimíveis... de uma lista de células conforme necessário.

1. Selecione o intervalo de células das quais deseja remover caracteres especiais e clique em "Kutools" > "Texto" > "Excluir Caracteres", veja a imagem:

2. Na caixa de diálogo "Excluir Caracteres":

• Marque a opção "Personalizado" na seção "Excluir Caracteres".
• Depois, digite os caracteres especiais na caixa de texto que deseja remover.
• Em seguida, clique no botão "Ok" ou "Aplicar" para remover imediatamente os caracteres especificados. Veja a imagem:

2.2 Remover todos os números das sequências de texto

Se você possui uma lista de sequências de texto misturadas com números, letras e caracteres especiais, e agora deseja apenas remover todos os números e manter os demais caracteres, esta seção apresenta formas práticas para ajudar você.

Remover números das sequências de texto com a função SUBSTITUIR

No Excel, a função SUBSTITUIR aninhada pode ajudar a trocar todos os números por nada. Assim, você pode usar a fórmula abaixo para remover todos os números das células:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,""),0,"")

Depois, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula e todos os números serão excluídos da lista de sequências de texto, veja a imagem:

Remover números das sequências de texto com a função TEXTJOIN

Se você possui o Excel2019,2021 ou365, a nova função TEXTJOIN também pode ajudar a remover números das sequências de texto.

Copie a fórmula abaixo em uma célula em branco e pressione as teclas Ctrl + Shift + Enter juntas para obter o primeiro resultado:

=TEXTJOIN("", TRUE, IF(ISERR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2) )), 1) *1), MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1), ""))

Depois, copie a fórmula para as outras células abaixo onde deseja aplicar esta fórmula, veja a imagem:

Observação: O TEXTJOIN está disponível apenas no Excel2019,2021 e Office365.

Remover números das sequências de texto com Função Definida pelo Usuário

Além das duas fórmulas acima, uma Função Definida pelo Usuário também pode ajudar, siga os passos abaixo:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover números das sequências de texto

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. Depois, feche e saia da janela de código, volte para a planilha e digite esta fórmula:=RemoveNumbers(A2)em uma célula em branco. Em seguida, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula, veja a imagem:

Remover números das sequências de texto com uma opção prática

Se você está cansado de fórmulas complicadas, veja uma ferramenta fácil – o recurso "Excluir Caracteres" do "Kutools para Excel". Com esse recurso prático, você pode realizar essa tarefa com apenas alguns cliques.

1. Selecione o intervalo de células das quais deseja remover números e clique em "Kutools" > "Texto" > "Excluir Caracteres".

2. Na caixa de diálogo "Excluir Caracteres", faça as seguintes operações:

• Marque a opção "Caracteres Numéricos" na seção "Excluir Caracteres".
• Em seguida, clique no botão "Ok" ou "Aplicar" para remover imediatamente os números. Veja a imagem:

2.3 Remover caracteres não numéricos das sequências de texto

Para remover todos os caracteres não numéricos e manter apenas os números das sequências de texto, esta seção apresenta algumas formas de resolver essa tarefa no Excel.

Remover caracteres não numéricos das sequências de texto com fórmula no Excel2016 e versões anteriores

Se você está usando o Excel2016 ou versões anteriores, deve aplicar uma fórmula complexa para realizar essa tarefa. Copie ou digite a fórmula abaixo em uma célula em branco:

=SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1)) * ROW(INDIRECT("1:"&LEN(A2))), 0), ROW(INDIRECT("1:"&LEN(A2))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A2)))/10)

Depois, copie a fórmula para as outras células abaixo onde deseja aplicar esta fórmula, veja a imagem:

Observação: Se os números em uma sequência de texto começarem com0, o0 será perdido.

Remover caracteres não numéricos das sequências de texto com a função TEXTJOIN no Excel2019,2021,365

A fórmula acima pode ser difícil de entender para a maioria de nós. Se você possui o Excel2019,2021 ou365, há uma fórmula prática que pode ajudar.

Copie ou digite a fórmula abaixo em uma célula em branco e pressione as teclas "Ctrl + Shift + Enter" juntas para obter o primeiro resultado correto:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:100")),1)+0,""))

Depois, arraste a alça de preenchimento para baixo até as células onde irá aplicar esta fórmula e você verá o resultado conforme mostrado na imagem abaixo:

Observação: Com esta fórmula, você verá que os zeros à esquerda serão mantidos, pois os números são retornados como texto.

Remover caracteres não numéricos das sequências de texto com Função Definida pelo Usuário

Claro, você também pode criar sua própria Função Definida pelo Usuário com uma sintaxe mais simples, faça assim:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover caracteres não numéricos das sequências de texto

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. Depois, feche e saia da janela de código, volte para a planilha e digite esta fórmula: =Removenonnumeric(A2)em uma célula em branco. Em seguida, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula; apenas os números serão extraídos conforme mostrado na imagem abaixo:

Remover caracteres não numéricos das sequências de texto com um recurso simples

Para excluir caracteres não numéricos diretamente em um intervalo de células, o recurso "Excluir Caracteres" do "Kutools para Excel" pode fazer isso com apenas alguns cliques.

1. Selecione o intervalo de células das quais deseja remover caracteres não numéricos e clique em "Kutools" > "Texto" > "Excluir Caracteres".

2. Na caixa de diálogo "Excluir Caracteres", defina as seguintes operações:

• Marque a opção "Caracteres Não Numéricos" na seção "Excluir Caracteres".
• Em seguida, clique no botão "Ok" ou "Aplicar" para remover imediatamente todos os caracteres não numéricos. Veja a imagem:

2.4 Separar texto e números de uma célula em duas colunas

Às vezes, você pode querer extrair o texto e os números das sequências de texto em duas colunas separadas. Com a ajuda dos métodos a seguir, você pode concluir essa tarefa de forma rápida e fácil.

Separar texto e números de uma célula em duas colunas com Função Definida pelo Usuário

Usando a Função Definida pelo Usuário abaixo, você pode extrair texto e números de uma vez. Siga os passos abaixo:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Separar texto e números das sequências de texto em duas colunas

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. Depois, feche e saia da janela de código, volte para a planilha e digite esta fórmula: =SplitText(A2,FALSE)em uma célula em branco. Em seguida, arraste a alça de preenchimento para baixo até as células que deseja preencher com esta fórmula para obter todo o texto, veja a imagem:

4. Depois, digite esta fórmula: =SplitText(A2,TRUE)em outra célula e arraste a alça de preenchimento para baixo até as células que deseja preencher com esta fórmula para obter os números, veja a imagem:

Separar texto e números de uma célula em duas colunas com um recurso fácil

Se você possui o "Kutools para Excel", o recurso "Dividir Células" pode ajudar a dividir células em várias colunas ou linhas com base em qualquer delimitador, largura especificada ou texto e número.

1. Selecione o intervalo de células que deseja dividir e clique em "Kutools" > "Mesclar & Dividir" > "Dividir Células", veja a imagem:

2. Na caixa de diálogo "Dividir Células", selecione a opção "Dividir Dados" na seção "Tipo" e marque "Dividir por Texto e Número" na seção "Separador", veja a imagem:

3. Em seguida, clique no botão "Ok" e outra caixa de diálogo "Dividir Células" será exibida. Selecione uma célula para exibir o texto e os números separados e clique no botão "OK". Agora, você verá o texto e os números das células selecionadas divididos em duas colunas de uma só vez, conforme mostrado na demonstração abaixo:

2.5 Remover caracteres de quebra de linha das sequências de texto

Uma quebra de linha permite que você tenha várias linhas na mesma célula no Excel. Às vezes, ao copiar dados de um site ou separar o conteúdo da célula manualmente com as teclas "Alt + Enter", surgem quebras de linha ou retornos de carro. Em certos casos, pode ser necessário excluir as quebras de linha para que o conteúdo da célula apareça em uma única linha, como mostrado na imagem abaixo. Aqui, apresento algumas formas de resolver essa tarefa no Excel.

Remover caracteres de quebra de linha das sequências de texto com o recurso Localizar e Substituir

No Excel, você pode usar o recurso "Localizar e Substituir" para remover quebras de linha. Faça assim:

1. Selecione o intervalo de dados do qual deseja remover as quebras de linha.

2. Depois, clique em "Página Inicial" > "Localizar e Selecionar" > "Substituir" (ou pressione as teclas "Ctrl + H") para abrir a caixa de diálogo "Localizar e Substituir", veja a imagem:

3. Na caixa de diálogo "Localizar e Substituir" que aparece, faça as seguintes operações:

• Coloque o cursor no campo "Localizar o que" e pressione "Ctrl + J" no teclado. Você pode não ver nada, mas o caractere de quebra de linha foi inserido.
• No campo "Substituir por", deixe este campo vazio para apenas excluir as quebras de linha ou pressione a barra de espaço uma vez para substituir as quebras de linha por espaços em branco.

4. Em seguida, clique no botão "Substituir Tudo". Todas as quebras de linha nas células selecionadas serão excluídas ou substituídas por espaços em branco de uma só vez. Veja a imagem:

Remover caracteres de quebra de linha das sequências de texto com a função SUBSTITUIR

Você também pode criar uma fórmula baseada nas funções SUBSTITUIR e CARACT para remover as quebras de linha das sequências de texto.

Aplique a fórmula abaixo para obter o resultado:

=SUBSTITUTE(A2,CHAR(10),"")

Dica: A função SUBSTITUIR localiza e substitui o caractere CARACT(10), que representa a quebra de linha, por nada. Se quiser que o resultado seja separado por vírgula e espaço, utilize a fórmula abaixo:

=SUBSTITUTE(A2,CHAR(10),", ")

Remover caracteres de quebra de linha das sequências de texto com código VBA

Se você se sente confortável usando código VBA, aqui também há um código para você. Siga os passos abaixo:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover quebras de linha das sequências de texto

Sub RemoveCarriage()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3. Depois, pressione a tecla "F5" para executar o código e uma caixa de prompt aparecerá. Selecione o intervalo do qual deseja remover as quebras de linha, conforme mostrado na imagem abaixo:

4. Depois, clique no botão "OK" e todas as quebras de linha serão excluídas do intervalo de dados selecionado.

Remover caracteres de quebra de linha das sequências de texto com uma opção inteligente

Aqui, o recurso "Excluir Caracteres" do "Kutools para Excel" também pode ajudar você a remover quebras de linha facilmente.

1. Selecione o intervalo de células do qual deseja remover quebras de linha e clique em "Kutools" >" Texto" > "Excluir Caracteres".

2. Na caixa de diálogo "Excluir Caracteres", defina as seguintes operações:

• Marque a opção "Caracteres Não Imprimíveis" na seção "Excluir Caracteres".
• Em seguida, clique no botão "Ok" ou "Aplicar" para remover todas as quebras de linha do intervalo de dados selecionado. Veja a imagem:

2.6 Remover espaços (à frente, atrás, extras ou todos) das sequências de texto

Copiar e colar texto de uma fonte externa para uma planilha do Excel frequentemente traz espaços em branco indesejados, tornando tedioso remover manualmente os espaços à frente, atrás ou extras. Felizmente, o Excel oferece truques fáceis para lidar com essa tarefa.

Remover espaços extras (à frente, atrás, em excesso) das sequências de texto com a função ARRUMAR

No Excel, para excluir espaços à frente, atrás e extras das sequências de texto, a função simples ARRUMAR pode ajudar. Essa função exclui todos os espaços, exceto os espaços simples entre palavras.

Digite a fórmula abaixo em uma célula em branco:

=TRIM(A2)

Depois, arraste a alça de preenchimento para baixo para copiar a fórmula para outras células. Agora, você verá que todos os espaços à frente, atrás e extras entre as palavras foram removidos de uma só vez, conforme mostrado na imagem:

Remover todos os espaços das sequências de texto

Se você deseja remover todos os espaços em branco das sequências de texto, a função SUBSTITUIR e o recurso Localizar & Substituir podem ajudar.

Usando a função SUBSTITUIR

Você pode usar a função SUBSTITUIR para trocar todos os espaços por nada. Aplique a fórmula abaixo em uma célula em branco:

=SUBSTITUTE(A2," ","") 

Depois, arraste a alça de preenchimento para baixo para copiar esta fórmula para outras células necessárias e todos os espaços serão excluídos conforme mostrado na imagem abaixo:

Usando o recurso Localizar e Substituir

Na verdade, o recurso "Localizar & Substituir" do Excel também pode ajudar a remover todos os espaços das células selecionadas. Siga os passos abaixo:

1. Selecione o intervalo de dados do qual deseja remover todos os espaços.

2. Depois, clique em "Página Inicial" >" Localizar e Selecionar" > "Substituir" (ou pressione as teclas "Ctrl + H") para abrir a caixa de diálogo "Localizar e Substituir". Na caixa de diálogo aberta, faça as operações abaixo:

• Pressione a barra de espaço no campo "Localizar o que";
• No campo "Substituir por", deixe este campo vazio.

3. Depois, clique no botão "Substituir Tudo". Todos os espaços em branco nas células selecionadas serão excluídos de uma só vez. Veja a imagem:

Remover todos os tipos de espaços das sequências de texto com um recurso avançado

O "Kutools para Excel" possui um recurso avançado – "Remover Espaços". Com essa ferramenta, você pode remover não só espaços à frente, atrás e em excesso, mas também todos os espaços dos intervalos selecionados em uma única caixa de diálogo, aumentando sua produtividade.

1. Selecione o intervalo de dados do qual deseja remover espaços e clique em "Kutools" > "Texto" > "Remover Espaços". Veja a imagem:

2. Na caixa de diálogo "Remover Espaços", selecione o tipo de espaço que deseja remover em "Tipo de Espaço":

• Para remover espaços à frente, selecione a opção "Espaços à Frente";
• Para remover espaços atrás, selecione a opção "Espaços Atrás";
• Para remover espaços à frente e atrás de uma vez, selecione a opção "Espaços à Frente & Espaços Atrás";
• Para remover todos os espaços extras, selecione a opção "Todos os Espaços Extras";
• Para remover todos os espaços, selecione a opção "Todos os Espaços".

3. Depois, clique no botão "Ok" ou "Aplicar" para obter o resultado desejado.

Remover caracteres / texto antes ou depois de um caractere específico

Nesta seção, apresento algumas operações para remover texto ou caracteres antes ou depois da primeira, última ou enésima ocorrência de um caractere específico.

3.1 Remover texto antes ou depois do primeiro caractere específico

Se você deseja remover o texto antes ou depois do primeiro caractere específico, como espaço ou vírgula, de uma lista de sequências de texto conforme mostrado na imagem abaixo, apresento dois métodos para você.

Remover texto antes do primeiro caractere específico com uma fórmula

Para remover texto ou caracteres antes do primeiro caractere específico, você pode criar uma fórmula baseada nas funções DIREITA, NÚM.CARACT e LOCALIZAR. A sintaxe genérica é:

• "cell": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto.

Por exemplo, para remover tudo antes da primeira vírgula das sequências, aplique a fórmula abaixo em uma célula em branco e arraste para baixo até as células necessárias, veja a imagem:

=RIGHT(A2,LEN(A2)-FIND(",",A2))

Observação: Na fórmula acima: "A2" é a célula da qual você deseja remover o texto; "," é o caractere específico pelo qual deseja remover o texto, podendo ser alterado conforme necessário.

Remover texto após o primeiro caractere específico com uma fórmula

Para remover tudo após o primeiro caractere específico, você pode usar as funções ESQUERDA e LOCALIZAR para obter o resultado. A sintaxe genérica é:

• "célula": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto.

Agora, digite a fórmula abaixo em uma célula em branco e arraste a alça de preenchimento para baixo até as outras células onde deseja aplicar esta fórmula. Todos os caracteres após a primeira vírgula serão removidos de uma só vez, veja a imagem:

=LEFT(A2,FIND(",",A2)-1)

3.2 Remover texto antes ou depois da enésima ocorrência de um caractere

Às vezes, as sequências de texto contêm várias ocorrências de um delimitador específico e você pode querer remover todos os caracteres antes ou depois de uma ocorrência específica, como a segunda, terceira ou quarta. Para lidar com esse tipo de remoção, utilize os truques a seguir:

Remover texto antes da enésima ocorrência de um caractere com uma fórmula

Para remover o texto antes da enésima ocorrência de um caractere específico, a fórmula abaixo pode ajudar. A sintaxe genérica é:

• "célula": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto;
• "N": A ocorrência do caractere antes da qual remover o texto.

Por exemplo, para remover tudo antes da segunda vírgula das sequências de texto, aplique a fórmula abaixo:

=RIGHT(A2,LEN(A2)-FIND("#",SUBSTITUTE(A2,",","#",2)))

Observação: Na fórmula acima: "A2" é a célula da qual você deseja remover o texto; "," é o caractere específico pelo qual deseja remover o texto, podendo ser alterado conforme necessário; "2" indica a enésima vírgula antes da qual deseja remover o texto.

Depois, arraste a alça de preenchimento para copiar a fórmula para outras células, veja a imagem:

Remover texto após a enésima ocorrência de um caractere com uma fórmula

Para remover o texto após a enésima ocorrência de um separador específico, as funções ESQUERDA, SUBSTITUIR e LOCALIZAR podem ajudar. A sintaxe genérica é:

• "célula": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto;
• "N": A ocorrência do caractere após a qual remover o texto.

Depois de entender a sintaxe básica, copie ou digite a fórmula abaixo em uma célula em branco:

=LEFT(A2, FIND("#", SUBSTITUTE(A2, ",", "#", 2)) -1)

Observação: Na fórmula acima: "A2" é a célula da qual você deseja remover o texto; "," é o caractere específico pelo qual deseja remover o texto, podendo ser alterado conforme necessário; "2" indica a enésima vírgula após a qual deseja remover o texto.

Depois, arraste a alça de preenchimento para copiar a fórmula para outras células e todos os caracteres após a segunda vírgula serão excluídos de uma só vez, veja a imagem:

Remover texto antes ou depois da enésima ocorrência de um caractere com Função Definida pelo Usuário

Como você pode ver, é possível resolver os casos de remoção de texto antes ou depois da enésima ocorrência de um caractere usando funções nativas do Excel em diferentes combinações. O problema é que é preciso lembrar dessas fórmulas complexas. Nesse caso, crio uma Função Definida pelo Usuário para cobrir todos os cenários. Faça assim:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover texto antes ou depois da enésima ocorrência de um caractere

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. Depois, feche e saia da janela de código, volte para a planilha e use as fórmulas a seguir:

Remover texto antes da segunda ocorrência de uma vírgula:

=RemoveTextOccurrence(A2, ", ", 2, FALSE)

Remover texto após a segunda ocorrência de uma vírgula

=RemoveTextOccurrence(A2, ", ", 2, TRUE)

3.3 Remover texto antes ou depois da última ocorrência de um caractere

Se você precisa remover todo o texto antes ou depois do último caractere específico, deixando apenas as substrings antes ou depois dele, esta seção fornece fórmulas para resolver esse problema.

Remover texto antes da última ocorrência de um caractere com uma fórmula

Para remover todos os caracteres antes da última ocorrência de um caractere, a sintaxe genérica é:

• "célula": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto;

Agora, se você precisa remover o texto antes da última ocorrência de uma vírgula, copie ou digite a fórmula abaixo em uma célula em branco:

=RIGHT(A2,LEN(A2)-SEARCH("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",","")))))

Observação: Na fórmula acima: "A2" é a célula da qual você deseja remover o texto; "," é o caractere específico pelo qual deseja remover o texto, podendo ser alterado conforme necessário.

Depois, arraste a alça de preenchimento para copiar a fórmula para outras células e todos os caracteres antes da última vírgula serão excluídos conforme mostrado na imagem abaixo:

Remover texto após a última ocorrência de um caractere com fórmulas

Se os valores das células são separados por um número variável de delimitadores e você deseja excluir tudo após a última ocorrência desse delimitador, a sintaxe genérica é:

• "célula": A referência da célula ou sequência de texto da qual deseja remover o texto;
• "char": O separador específico pelo qual deseja remover o texto;

Copie ou digite a fórmula abaixo em uma célula em branco e arraste a alça de preenchimento para baixo para obter outros resultados necessários, veja a imagem:

=LEFT(A2,FIND("#",SUBSTITUTE(A2,",>","#",LEN(A2)-LEN(SUBSTITUTE(A2,",",""))))-1)

"Observação": Na fórmula acima: "A2" é a célula da qual você deseja remover o texto; "," é o caractere específico pelo qual deseja remover o texto, podendo ser alterado conforme necessário.

3.4 Remover texto entre parênteses

Se você possui uma lista de sequências de texto com parte dos caracteres entre parênteses, pode querer remover todos os caracteres dentro dos parênteses, incluindo os próprios parênteses, conforme mostrado na imagem abaixo. Esta seção apresenta truques para resolver essa tarefa no Excel.

Remover texto entre parênteses com o recurso Localizar e Substituir

No Excel, o recurso interno Localizar e Substituir pode ajudar a localizar todos os textos entre parênteses e substituí-los por nada. Faça assim:

1. Selecione a lista de dados da qual deseja remover os textos entre parênteses.

2. Depois, clique em "Página Inicial" > "Localizar e Selecionar" > "Substituir" (ou pressione as teclas "Ctrl + H") para abrir a caixa de diálogo Localizar e Substituir. Na caixa de diálogo, faça as seguintes operações:

• No campo "Localizar o que", digite "(*)" na caixa de texto;
• No campo "Substituir por", deixe este campo vazio.

3. Depois, clique no botão "Substituir Tudo". Todos os caracteres dentro dos parênteses (incluindo os parênteses) nas células selecionadas serão excluídos de uma só vez. Veja a imagem:

Dica: O recurso "Localizar e Substituir" também funciona para dois ou mais pares de parênteses dentro das sequências de texto.

Remover texto entre parênteses com fórmula

Além do recurso Localizar e Substituir, você também pode usar uma fórmula para resolver essa tarefa no Excel. A sintaxe genérica é:

• "texto": A sequência de texto ou referência de célula da qual deseja remover caracteres.

Agora, copie ou digite a fórmula abaixo em uma célula em branco onde deseja obter o resultado:

=SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),"")

Depois, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula. Todos os textos entre parênteses, incluindo os próprios parênteses, serão removidos de uma só vez, veja a imagem:

Dica: Se não houver parênteses no valor da célula, um erro será exibido após aplicar a fórmula acima. Para ignorar o erro, utilize a fórmula abaixo:

=IFERROR(SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),""),A2)

Remover texto entre parênteses com Função Definida pelo Usuário

A fórmula acima funciona bem para remover texto de um par de parênteses. No entanto, se você precisa remover texto de vários pares de parênteses nas sequências de texto, a fórmula não funcionará corretamente. Aqui, crio uma Função Definida pelo Usuário simples para resolver essa tarefa.

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover texto entre parênteses

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. Volte para a planilha, digite esta fórmula em uma célula em branco: "=remtxt(A2)", depois arraste a alça de preenchimento para baixo para aplicar a fórmula. Todo o texto dentro dos parênteses, incluindo os próprios parênteses, será removido, conforme mostrado na imagem:

Remover palavras das sequências de texto

Em certos casos, pode ser necessário remover algumas palavras de uma lista de células, como a primeira ou última palavra, ou palavras duplicadas de uma célula. Para resolver esses tipos de remoção, esta seção apresenta alguns métodos para você.

4.1 Remover a primeira ou última palavra da sequência de texto

Para remover a primeira ou última palavra de uma lista de sequências de texto, as fórmulas a seguir podem ajudar.

Remover a primeira palavra da sequência de texto com fórmula

Para remover as primeiras palavras de uma lista de sequências de texto, crie uma fórmula simples baseada nas funções DIREITA, NÚM.CARACT e LOCALIZAR. A sintaxe genérica é:

• "texto": A sequência de texto ou referência de célula da qual deseja remover a primeira palavra.

Agora, digite ou copie a fórmula abaixo em uma célula em branco:

=RIGHT(A2,LEN(A2)-FIND(" ",A2))

Depois, arraste a alça de preenchimento para baixo para aplicar a fórmula às outras células, veja a imagem:

Dica: Se precisar remover as primeiras N palavras das células, utilize a fórmula abaixo:

• "texto": A sequência de texto ou referência de célula da qual deseja remover as primeiras n palavras;
• "N": Indica quantas palavras deseja remover do início da sequência de texto.

Por exemplo, para remover as duas primeiras palavras das células, copie ou digite a fórmula abaixo em uma célula em branco para obter o resultado desejado, veja a imagem:

=MID(TRIM(A2),1+FIND("~",SUBSTITUTE(TRIM(A2)," ","~",2)),255)

Remover a última palavra da sequência de texto com fórmula

Para remover a última palavra das sequências de texto, também é possível usar uma fórmula para essa tarefa. A sintaxe genérica é:

• "texto": A sequência de texto ou referência de célula da qual deseja remover a última palavra;

Utilize a fórmula abaixo em uma célula em branco e arraste a alça de preenchimento para baixo para aplicar a fórmula às outras células, veja a imagem:

=LEFT(TRIM(A2),FIND("~",SUBSTITUTE(A2," ","~",LEN(TRIM(A2))-LEN(SUBSTITUTE(TRIM(A2)," ",""))))-1)

Dica: Para remover as últimas N palavras de uma lista de células, a sintaxe genérica é:

• "texto": A sequência de texto ou referência de célula da qual deseja remover as últimas n palavras;
• "N": Indica o número de palavras que deseja remover do final da sequência de texto.

Supondo que você queira excluir as últimas3 palavras de uma lista de células, utilize a fórmula abaixo para obter o resultado, veja a imagem:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",LEN(A2)-LEN(SUBSTITUTE(A2," ",""))-(3-1))))

4.2 Remover caracteres ou palavras duplicadas dentro de uma célula

Ao remover valores ou linhas duplicadas, o Excel oferece algumas opções diferentes, mas, quando se trata de remover caracteres ou palavras duplicadas dentro de uma célula, pode não haver um recurso interno adequado para isso. Neste caso, esta seção ajuda a criar algumas Funções Definidas pelo Usuário para resolver esse problema.

Remover caracteres duplicados dentro de uma célula usando Função Definida pelo Usuário

Se você possui várias ocorrências do mesmo caractere em uma célula, para remover os caracteres duplicados e manter apenas as primeiras ocorrências, conforme mostrado na imagem abaixo, utilize a Função Definida pelo Usuário a seguir.

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover caracteres duplicados dentro de uma célula

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. Depois, feche a janela de código, volte para a planilha e digite esta fórmula =RemoveDupeschars(A2)em uma célula em branco ao lado dos seus dados. Em seguida, arraste a alça de preenchimento para as células onde deseja aplicar esta fórmula, veja a imagem:

Observação:"A2" é a célula de dados da qual você deseja remover caracteres duplicados.

Dica: A função diferencia maiúsculas de minúsculas, tratando letras minúsculas e maiúsculas como caracteres diferentes.

Remover palavras duplicadas dentro de uma célula usando Função Definida pelo Usuário

Supondo que você tenha as mesmas palavras ou sequências de texto em uma célula e queira remover todas as palavras iguais da célula, conforme mostrado na imagem abaixo. Utilize a Função Definida pelo Usuário a seguir para resolver essa tarefa no Excel.

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Remover palavras duplicadas dentro de uma célula

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. Depois, feche a janela de código, volte para a planilha e digite esta fórmula =RemoveDupeswords(A2,", ")em uma célula em branco ao lado dos seus dados. Em seguida, arraste a alça de preenchimento para as células onde deseja aplicar esta fórmula, veja a imagem:

Observação: "A2" é a célula da qual você deseja excluir as palavras duplicadas, e a vírgula e espaço (", ") são os delimitadores para separar as sequências de texto. Você pode alterá-los conforme necessário.

Dica: Esta função não diferencia maiúsculas de minúsculas, tratando letras minúsculas e maiúsculas como os mesmos caracteres.

4.3 Reduzir a sequência de texto para N palavras

Se você possui uma sequência de texto longa em uma célula, às vezes pode querer reduzi-la para um determinado número de palavras, ou seja, manter apenas as primeiras n palavras e cortar o restante. Esta seção apresenta truques para ajudar você a realizar essa tarefa no Excel.

Reduzir a sequência de texto para N palavras com fórmula

Para reduzir uma sequência de texto para N palavras, crie uma fórmula baseada nas funções ESQUERDA, LOCALIZAR e SUBSTITUIR. A sintaxe genérica é:

• "texto": A sequência de texto ou referência de célula que deseja reduzir;
• "N": O número de palavras que deseja manter do lado esquerdo da sequência de texto fornecida.

Para realizar essa tarefa, copie ou digite a fórmula abaixo em uma célula em branco:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",B2))-1)

Depois, arraste a alça de preenchimento para baixo para aplicar esta fórmula às outras células, veja a imagem:

Reduzir a sequência de texto para N palavras com Função Definida pelo Usuário

Além da fórmula acima, você também pode criar uma Função Definida pelo Usuário para resolver essa tarefa. Faça assim:

1. Mantenha pressionadas 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 do Módulo.

Código VBA: Reduzir a sequência de texto para N palavras

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. Depois, feche e saia da janela de código, volte para a planilha e digite esta fórmula: =GetNWords(A2,B2)em uma célula em branco. Em seguida, arraste a alça de preenchimento para baixo para aplicar esta fórmula às outras células. Apenas o número específico de palavras será mantido, conforme mostrado na imagem abaixo: