Como converter colunas numa lista separada por vírgulas no Excel?
Ao trabalhar com dados do Excel, é frequente precisar de transformar uma lista vertical de itens numa única cadeia separada por vírgulas. Quer esteja a preparar dados para uma base de dados, a elaborar um relatório ou simplesmente a organizar a sua folha de cálculo, existem várias formas eficazes de o fazer. A seguir, exploramos quatro métodos otimizados:
Converter Colunas numa lista separada por vírgulas com fórmulas
- Fórmula 1: função TEXTJOIN (Excel 2019 e versões posteriores, Office 365)
- Fórmula 2: funções CONCAT e IF (todas as versões do Excel)
Converter Colunas numa lista separada por vírgulas com Kutools para Excel
Converter Colunas numa lista separada por vírgulas com código VBA
Converter Colunas numa lista separada por vírgulas com fórmulas
O Excel não inclui uma função para converter colunas em listas separadas por vírgulas, mas pode fazê-lo facilmente: use TEXTJOIN no Office 365/2019+ ou CONCAT+IF em qualquer versão para simplificar os seus dados.
Fórmula 1: função TEXTJOIN (Excel 2019 e versões posteriores, Office 365)
Como a função de concatenação mais avançada do Excel, TEXTJOIN simplifica o processo com dupla funcionalidade: seleção flexível de delimitadores e gestão automática de células vazias — oferecendo a solução mais simples para os utilizadores atuais do Excel.
1. Selecione a célula onde pretende que a lista separada por vírgulas apareça e introduza a seguinte fórmula:
=TEXTJOIN(", ", TRUE, A2:A10)2. Pressione Enter para obter o valor separado por vírgulas.
- «, » é o delimitador (vírgula seguida de um espaço).
- TRUE indica ao Excel para ignorar células em branco.
- A2:A10 é o seu intervalo de origem.
=TEXTJOIN(", ", TRUE, UNIQUE(A2:A10))- 🔹Implementação simples: requer apenas uma função.
- 🔹Delimitador flexível: pode utilizar «, » (vírgula seguida de espaço) ou apenas «,», conforme necessário.
- 🔹Gestão automática: ignora células vazias quando a opção ignore_empty está definida como TRUE.
- 🔸Requer Excel 2019 ou versões posteriores, incluindo o Office 365.
Fórmula 2: funções CONCAT e IF (todas as versões do Excel)
Antes da função TEXTJOIN, era possível combinar CONCAT com a função SE para criar uma lista e, em seguida, remover o delimitador inicial.
1. Selecione a célula onde deseja que apareça a lista separada por vírgulas e introduza a seguinte fórmula:
=CONCAT(IF(A2:A10<>"", A2:A10 & ", ", ""))2. Pressione Ctrl + Shift + Enter em simultâneo para obter o resultado.
- IF(A2:A100«», A2:A100 & «，», «»): Verifica cada célula em A2:A100. Se uma célula não estiver vazia, devolve o seu valor seguido de uma vírgula; caso contrário, devolve uma cadeia vazia.
- CONCAT(...): Concatena todos os elementos dessa matriz numa única cadeia contínua.
- 🔹Ampla compatibilidade: funciona em qualquer versão do Excel que suporte fórmulas matriciais, sem depender de funções mais recentes.
- 🔹Ignora células vazias: a verificação IF ignora automaticamente as células vazias.
- 🔸Operação complexa: deve ser introduzida como uma fórmula matricial, exigindo que os utilizadores premam Ctrl + Shift + Enter — um passo que muitos principiantes esquecem.
- 🔸Desempenho fraco: o cálculo pode abrandar significativamente ou mesmo bloquear ao processar grandes conjuntos de dados (dezenas de milhares de linhas).
- 🔸Resultado fixo: requer passos adicionais para remover a vírgula final caso deseje eliminar o último delimitador.
Converter Colunas numa lista separada por vírgulas com Kutools para Excel
O Kutools para Excel inclui uma poderosa utilidade Combinar Linhas/Colunas/Células e Manter Valores que lhe permite fundir o conteúdo de uma coluna inteira numa única célula com apenas alguns cliques. Ao selecionar o seu intervalo de origem e especificar um delimitador — seja uma vírgula, ponto e vírgula, espaço ou qualquer símbolo personalizado — obtém instantaneamente uma lista consolidada e delimitada, sem precisar de copiar e colar manualmente cada item. A ferramenta oferece ainda opções para ignorar células vazias e preservar a formatação original, tornando-a na solução ideal para transformar rapidamente dados verticais em listas organizadas e separadas por vírgulas.
1. Selecione as colunas que pretende converter numa lista separada por vírgulas e clique em Kutools > Mesclar e Dividir > Combinar Linhas/Colunas/Células e Manter Valores.
2. Na caixa de diálogo Combinar Colunas ou Linhas que se abre, terá de:
- (1) Marque a opção **Mesclar em uma única célula** na secção **Mesclar o intervalo selecionado**, da seguinte forma.
- (2) Na secção Separador, marque a opção Outro separador e digite uma vírgula «,».
- (3.) Escolha como tratar os dados das células originais — pode mantê-los ou eliminá-los.
- (4.) Especifique a célula de saída: na secção «Colocar os valores mesclados em», selecione a opção «Outra Célula» e clique para escolher a célula onde o resultado será apresentado.
- (5.) Por fim, clique no botão OK.
O resultado é inserido na célula de destino que especificou.
- 🔹Extremamente fácil de usar.
- 🔹Sem fórmulas nem código.
- 🔹Processa grandes intervalos com facilidade.
- 🔹Combine linhas, colunas ou intervalos com qualquer delimitador, mantenha a formatação e escolha a localização de saída.
- 🔸Requer instalação.
Converter Colunas numa lista separada por vírgulas com código VBA
Alternativamente, se preferir automatizar a tarefa ou precisar de lidar com intervalos maiores e dinâmicos, pode criar uma macro VBA que percorra cada célula da coluna especificada, adicione o seu valor não vazio seguido de uma vírgula (ou outro delimitador à sua escolha), remova o delimitador extra no final e insira a cadeia totalmente concatenada e separada por vírgulas numa célula de destino.
1. Mantenha premidas as teclas Alt e F11 no teclado para abrir uma janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e copie o código VBA para o módulo.
VBA: Converter Colunas numa lista separada por vírgulas
Sub ChangeRange()
' Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Dim outStr As String
Dim xTitleId As String
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Select source range:", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Output to (single cell):", xTitleId, Type:=8)
outStr = ""
For Each rng In InputRng
If Len(Trim(rng.Value)) > 0 Then
If outStr = "" Then
outStr = rng.Value
Else
outStr = outStr & ", " & rng.Value
End If
End If
Next rng
OutRng.Value = outStr
End Sub
3. Clique no botão Executar ou prima F5 para executar o VBA. É apresentada uma caixa de diálogo no ecrã, onde pode selecionar as colunas que pretende converter. Veja a imagem:
4. Clique em OK e, de seguida, surge outra caixa de diálogo para selecionar uma célula. Veja a imagem:
5. Clique em OK e todos os valores nas colunas serão convertidos numa lista separada por vírgulas numa única célula.
Conclusão:
- Para maior simplicidade e desempenho, utilize a função TEXTJOIN no Excel 2019/365.
- Para garantir compatibilidade, o método matricial CONCAT + IF funciona em todas as versões.
- Para tarefas pontuais sem fórmulas, o Kutools oferece uma solução com apenas alguns cliques do rato.
- Para automatização total ou regras complexas, uma macro VBA é a opção mais flexível.
Escolha o método que melhor se adapta à sua versão do Excel, à frequência com que realiza esta tarefa e ao seu nível de conforto com extras ou VBA. Com estas técnicas otimizadas na sua caixa de ferramentas, converter qualquer coluna numa lista organizada e separada por vírgulas torna-se surpreendentemente simples. Se estiver interessado em explorar mais dicas e truques do Excel, o nosso site oferece milhares de tutoriais para o ajudar a dominar o Excel.
Artigos Relacionados:
- Converter nome do mês em número no Excel
- Converter hora militar em hora padrão
- Converter uma célula em várias células/linhas 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