Remover Caracteres ou Palavras Duplicadas no Excel

Ao trabalhar com dados de texto no Excel, é comum encontrar caracteres duplicados ou palavras repetidas dentro de uma única célula — uma situação frequente em dados importados, entradas de utilizador, etiquetas ou descrições de produtos. Remover essas duplicações melhora a legibilidade, garante consistência dos dados e torna as análises posteriores mais fiáveis.

Neste guia, apresentamos vários métodos eficazes para remover caracteres ou palavras duplicados no Excel — desde fórmulas integradas e uma solução em lote mais rápida com o Kutools para Excel, até funções VBA totalmente personalizáveis. Escolha o método que melhor se adapta à sua versão do Excel, ao seu nível técnico e às necessidades do seu fluxo de trabalho.

• Utilizando fórmula do Excel
• Utilizando Kutools para Excel em lote
• Utilizando função definida pelo utilizador

Remover caracteres duplicados no Excel

Remover caracteres duplicados significa manter apenas a primeira ocorrência de cada caractere numa célula (por exemplo, converter ")aabbcc« → »abc"). Abaixo estão três métodos práticos para alcançar este objetivo.

Utilizando fórmula do Excel

Se estiver a utilizar o Excel para Microsoft 365, Excel 2021 ou versão posterior, pode eliminar caracteres duplicados com fórmulas de matriz dinâmica. Este método é totalmente integrado e atualiza-se automaticamente sempre que os seus dados de origem forem alterados, sendo ideal para quem prefere soluções baseadas em fórmulas.

Passos:

1. Selecione uma célula vazia onde deseja exibir o resultado (por exemplo, D2).
2. Introduza a seguinte fórmula:

   =TEXTJOIN("",,UNIQUE(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)))

3. Prima Enter para obter o resultado.
4. Arraste a alça de preenchimento para baixo para aplicar a fórmula às outras células, se necessário.

   

Como funciona a fórmula:

• MIDextrai cada caractere do texto
• LIN+INDIRETOgera as posições dos caracteres
• ÚNICORemover duplicatas
• JUNTARTEXTOcombina o resultado novamente numa cadeia

Utilizar Kutools para Excel em massa

Se pretender evitar fórmulas complexas e precisar de uma abordagem mais rápida e intuitiva — especialmente para conjuntos de dados grandes —, o Kutools para Excel oferece uma forma conveniente de remover caracteres duplicados em massa.

Passos:

1. Selecione o intervalo de células onde deseja remover caracteres duplicados.
2. Aceda a Kutools>Texto>Excluir Caracteres Específicos.

   

3. Na caixa de diálogo Excluir Caracteres Específicos, selecione apenas a opção Caracteres Duplicados. Clique em OK.

   

Resultado:

Todos os caracteres duplicados em cada célula selecionada são removidos instantaneamente, preservando apenas a primeira ocorrência.

Vantagens:

• Não requer fórmulas nem programação
• Funciona em todas as versões do Excel
• Suporta processamento em lote
• Interface simples e intuitiva
• Poupa tempo significativo em conjuntos de dados grandes

Utilizando função definida pelo utilizador

Se a sua versão do Excel não suportar fórmulas de matriz dinâmica ou se preferir uma solução personalizada e reutilizável, pode utilizar uma função definida pelo utilizador (UDF) em VBA para remover caracteres duplicados.

Passos:

1. Prima Alt + F11 para abrir o Editor do VBA.
2. Clique em Inserir > Módulo.
3. Cole o seguinte código:
   Código VBA: Remover caracteres duplicados

   Function RemoveDupes1(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
   RemoveDupes1 = xOutValue
   End Function

   

4. Prima Alt + Q para fechar o editor do VBA e regressar ao Excel.
5. Numa célula vazia onde pretende apresentar o resultado, introduza a seguinte fórmula:

   =RemoveDupes1(C2)

   

Adicional: Remover palavras duplicadas com função definida pelo utilizador

Em alguns casos, os seus dados podem conter palavras repetidas em vez de caracteres, como por exemplo:

Poderá pretender manter apenas palavras únicas, preservando a respetiva ordem.

Este método permite-lhe eliminar palavras duplicadas com base num delimitador, como uma vírgula, um espaço ou um ponto e vírgula.

Passos:

1. Prima Alt + F11 para abrir o editor do VBA.
2. Clique em Inserir > Módulo.
3. Cole o seguinte código:
   Código VBA: Remover palavras duplicadas

   Function RemoveDupes2(txt As String, Optional delim As String = " ") As String
       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 RemoveDupes2 = Join(.keys, delim)
       End With
   End Function
   

   

4. Prima Alt + Q para fechar o editor do VBA e regressar ao Excel.
5. Numa célula vazia onde pretende apresentar o resultado, introduza a seguinte fórmula:

   =RemoveDupes2(A2,",")

6. Prima Enterpara obter o resultado e, em seguida, arraste a Alça de Preenchimentopara baixo, de modo a aplicar a fórmula a outras células.

   

Conclusão

A remoção de caracteres ou palavras duplicados no Excel pode ser feita de várias formas, dependendo das suas necessidades e do ambiente do Excel.

• Utilize fórmulas do Excel se preferir uma solução integrada e dinâmica (Excel 365/2021).
• Utilize o Kutools para Excel se pretender um método rápido de processamento em lote sem recorrer a fórmulas.
• Utilize funções VBA sempre que precisar de maior flexibilidade ou estiver a trabalhar com versões mais antigas do Excel.

Cada método tem as suas próprias vantagens, e a melhor opção depende do seu fluxo de trabalho, do seu nível de conforto técnico e da complexidade dos dados. Para a maioria dos utilizadores que trabalham com grandes conjuntos de dados, uma ferramenta como o Kutools pode simplificar significativamente o processo e aumentar a eficiência.