Como combinar textos numa coluna sem duplicados no Excel?
Ao trabalhar com listas ou grandes conjuntos de dados no Excel, é frequente precisar de combinar todo o conteúdo textual de uma coluna numa única célula — garantindo, ao mesmo tempo, que quaisquer valores duplicados apareçam apenas uma vez. Além disso, poderá deparar-se com situações em que os textos de uma coluna devem ser concatenados com base num valor específico noutra coluna, mantendo ainda assim a exclusão de duplicados. Dominar estas técnicas revela-se extremamente útil para limpar, resumir e criar relatórios eficazes, assegurando folhas de cálculo organizadas e de fácil interpretação. Este artigo explora diversas abordagens práticas para atingir estes objetivos e oferece orientações detalhadas e passo a passo para os cenários mais comuns.
Juntar textos numa coluna sem duplicados com fórmula
Juntar textos numa coluna sem duplicados com base no valor de outra célula com código VBA
Juntar facilmente textos numa coluna com base no valor de outra célula com uma ferramenta extraordinária
Mais tutoriais para combinar células…
Juntar textos numa coluna sem duplicados com fórmula
Imagine que tem uma coluna de valores textuais na sua folha de cálculo e pretende combiná-los numa única célula, eliminando entradas duplicadas, tal como ilustrado na captura de ecrã abaixo. Esta solução é ideal para criar campos resumo ou listas únicas separadas por vírgulas, perfeitas para relatórios e painéis. O método não exige macros nem ferramentas externas e funciona na maioria das versões do Excel que suportam funções de matriz dinâmica e TEXTJOIN.
Selecione uma célula vazia onde pretende que o texto combinado apareça. Copie e cole a fórmula abaixo na célula selecionada e, em seguida, prima Ctrl+Shift+Enter se estiver a utilizar versões mais antigas do Excel. Nas versões mais recentes que suportam matrizes dinâmicas (Excel 365 ou Excel 2019 e posteriores), basta premir Enter:
=TEXTJOIN(", ", TRUE, IF(MATCH(A2:A12, A2:A12,0)=MATCH(ROW(A2:A12), ROW(A2:A12)), A2:A12, «»))
Explicação dos parâmetros e notas de utilização:
- A2:A12: Define a gama de células cujos valores pretende juntar. Ajuste esta gama conforme necessário para se adaptar aos seus dados.
- ", ": Este é o separador utilizado entre os textos combinados (neste exemplo, uma vírgula seguida de um espaço). Para utilizar outros separadores, como ponto e vírgula ou quebra de linha, basta alterar este argumento.
- TRUE: Esta definição indica à função TEXTJOIN para ignorar células vazias.
Após concluir estes passos, obterá uma única célula com todos os valores textuais únicos da coluna especificada, unidos pelo separador definido.
Juntar textos numa coluna sem duplicados com base no valor de outra célula com código VBA
Há situações em que precisa de concatenar texto numa coluna com base nos valores únicos de outra — por exemplo, listar todos os projetos atribuídos a um membro da equipa ou os tópicos abordados em cada sessão, sem repetir qualquer entrada. As funções nativas do Excel podem revelar-se limitadas ou complexas nestes cenários, sobretudo à medida que o volume de dados cresce. O VBA oferece uma solução flexível para automatizar este processo, mesmo quando é necessário fundir um elevado número de linhas por grupo, ignorando duplicados. A solução VBA seguinte permite-lhe alcançar este objetivo rapidamente e exportar os resultados para uma nova folha, mantendo os seus dados de origem intactos para segurança e revisão.
1. Na folha de cálculo que contém os textos que pretende combinar, prima Alt + F11 para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Na janela do Visual Basic, clique em Inserir>Módulopara criar um novo módulo e, em seguida, cole o seguinte código na janela de código do módulo:
Código VBA: Juntar textos numa coluna sem duplicados com base no valor de outra célula
Sub JoinTextsWithoutDuplicates()
'Updated by Extendoffice 20190924
Dim xRg As Range
Dim xArr As Variant
Dim xCell As Range
Dim xTxt As String
Dim I As Long
Dim xDic As Object
Dim xValue
Dim xStr, xStrValue As String
Dim xB As Boolean
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "Does not support multiple selections", , "Kutools for Excel"
Exit Sub
End If
If xRg.Columns.Count <> 2 Then
MsgBox "There must be only two columns in the selected range", , "Kutools for Excel"
Exit Sub
End If
xArr = xRg
Set xDic = CreateObject("Scripting.Dictionary")
xDic.CompareMode = 1
For I = 1 To UBound(xArr)
If Not xDic.Exists(xArr(I, 1)) Then
xDic.Item(xArr(I, 1)) = xDic.Count + 1
xArr(xDic.Count, 1) = xArr(I, 1)
xArr(xDic.Count, 2) = xArr(I, 2)
Else
xStrValue = xArr(I, 2)
xB = True
For Each xStr In Split(xArr(xDic.Item(xArr(I, 1)), 2), ",")
If xStr = xStrValue Then
xB = False
Exit For
End If
Next
If xB Then
xArr(xDic.Item(xArr(I, 1)), 2) = xArr(xDic.Item(xArr(I, 1)), 2) & "," & xArr(I, 2)
End If
End If
Next
Sheets.Add.Cells(1).Resize(xDic.Count, 2).Value = xArr
End Sub
3. Para executar o código, basta premir a tecla F5. Na caixa de diálogo que surge (intitulada)Kutools para Excel), selecione o intervalo que contém tanto a coluna de agrupamento como os textos a juntar. O intervalo deve ter duas colunas de largura (por exemplo, a primeira coluna com uma categoria e a segunda com os valores textuais associados). Clique em OK para confirmar a sua seleção e continuar.
Assim que o código terminar, verá que uma nova planilha foi adicionada ao seu livro. Nela, os valores únicos da sua coluna-chave estão listados e, ao lado de cada um, os textos correspondentes da coluna original foram agrupados — com cada valor aparecendo apenas uma vez. Trata-se de uma solução particularmente eficiente para resumir dados agrupados, como reunir comentários de clientes por produto ou listar projetos por gestor, entre outros.
Junte facilmente textos numa coluna com base no valor de outra célula com uma ferramenta extraordinária
Antes de aplicar o Kutools para Excel, por favor, descarregue e instale-o primeiro.
Este método permite-lhe configurar interativamente as suas operações de resumo e fusão conforme necessário, sendo ideal para utilizadores que trabalham frequentemente com conjuntos de dados variáveis ou que precisam de repetir a operação várias vezes com parâmetros diferentes.
Nota: Como este utilitário modifica diretamente o seu Selecionar intervalo, recomenda-se vivamente que faça uma cópia de segurança dos dados originais da sua folha antes de realizar a operação de combinação. Desta forma, evita perdas acidentais de dados ou a substituição de informações importantes.
1. Selecione a gama de células que inclui tanto os valores pelos quais pretende agrupar como os textos a mesclar. Em seguida, aceda ao separador Kutools, clique em Mesclar e Dividir e selecione Mesclar Linhas Avançado no menu pendente.
2. Na caixa de diálogo Mesclar Linhas Avançadoque surge:
- Escolha a coluna que define como os seus textos são agrupados e clique em Chave Primária. Normalmente, trata-se da coluna de identificação ou categoria.
- Selecione a coluna que contém os textos que pretende mesclar e, em seguida, clique em Combinar > Vírgula (ou escolha o seu separador preferido).
- Se existirem colunas adicionais, como valores numéricos ou outros atributos, poderá especificar operações para as mesmas (por exemplo, somar totais ou calcular médias) selecionando a função correspondente, tal como Calcular > Soma.
- Clique em OK para executar a operação e os dados serão combinados em conformidade. Veja a seguinte captura de ecrã como exemplo:
Após o processo, observará que todos os valores textuais na coluna especificada foram juntos de acordo com o agrupamento da sua Coluna Chave escolhida. Esta abordagem é especialmente vantajosa para utilizadores que necessitam de uma solução rápida e repetível sem terem de memorizar fórmulas.
Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.
Artigos relacionados
Combine linhas duplicadas e some os valores no Excel
No Excel, poderá frequentemente deparar-se com este problema: tem um conjunto de dados com entradas duplicadas e pretende combiná-las, somando os valores correspondentes noutra coluna. Como resolver esta situação? Experimente os métodos neste artigo.
Combine várias células numa única célula com espaços, vírgulas ou outros separadores no Excel
Quando combina células de múltiplas colunas ou linhas numa única célula, os dados resultantes podem não incluir qualquer separador. Mas se pretender separá-los com marcas específicas — como espaços, vírgulas, ponto e vírgula ou outros — como poderá fazê-lo? Este tutorial mostra-lhe alguns métodos eficazes.
Concatenar células mantendo a formatação de números e datas no Excel
Já reparou que, ao utilizar a função CONCATENAR no Excel, a formatação de datas (por exemplo, 2014-01-03) e de números — como moeda ($734,70), percentagem (48,9 %), casas decimais (24,5000), entre outras — desaparece, sendo substituída por valores numéricos genéricos no resultado da concatenação? Neste artigo, apresentamos várias soluções práticas para concatenar dados sem perder a formatação original de datas ou números no Excel.
Inverter a função de concatenação no Excel
Como todos sabemos, a função CONCATENAR no Excel permite-nos combinar várias células numa só. Mas por vezes queremos exatamente o oposto: em vez de juntar células, precisamos de dividir o conteúdo de uma única célula em várias células separadas. Os métodos neste artigo resolvem exatamente esse desafio.
Concatenar células se existir o mesmo valor noutra coluna no Excel
Este artigo apresenta métodos que lhe permitem concatenar facilmente células sempre que houver o mesmo valor noutra coluna no Excel.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos