Dividir valores separados por vírgulas em linhas/colunas no Excel – guia fácil
Em determinadas situações, poderá precisar de dividir valores separados por vírgulas, presentes em células selecionadas, em linhas ou colunas individuais. Este guia apresenta métodos eficazes para o ajudar a alcançar esse objetivo, com instruções passo a passo que garantem uma gestão e reorganização eficientes dos seus dados, adaptadas às suas necessidades.
Dividir valores separados por vírgulas em colunas diferentes
Para dividir valores separados por vírgulas nas células selecionadas em colunas distintas, experimente os métodos nesta secção.
Utilize o assistente Texto para Colunas para dividir valores separados por vírgulas em colunas
Para dividir valores separados por vírgulas em células selecionadas em colunas, o método mais comum é utilizar o assistente **Texto para Colunas** do Excel. Mostro-lhe, passo a passo, como usar este assistente para obter exatamente o resultado pretendido.
1. Selecione o intervalo de células cujos valores pretende dividir em colunas e, em seguida, clique em «Dados» > «Texto para Colunas». Veja a imagem:
2. Na primeira caixa de diálogo do «Assistente para converter texto em colunas», selecione a opção «Delimitado» e clique em «Seguinte».
3. Na segunda caixa de diálogo do «Assistente para converter texto em colunas», selecione apenas a opção «Vírgula» na secção «Delimitadores» e clique em «Seguinte».
4. Na última caixa de diálogo do «Assistente para converter texto em colunas», selecione na caixa «Destino» a célula onde pretende colocar os valores divididos e, finalmente, clique no botão «Concluir».
Agora, todos os valores nas células selecionadas que estavam separados por vírgulas foram distribuídos por colunas distintas, conforme ilustrado na imagem seguinte.
Divida facilmente valores separados por vírgulas em várias colunas com o Kutools
Como pode verificar, o assistente «Texto para Colunas» exige vários passos para concluir a tarefa. Se precisar de um método mais simples, recomendamos vivamente a funcionalidade «Dividir Células» do «Kutools para Excel». Com ela, pode dividir células facilmente em várias colunas ou linhas com base num delimitador específico — tudo configurado numa única caixa de diálogo.
Após instalar o Kutools para Excel, selecione «Kutools» > «Mesclar e Dividir» > «Dividir Células» para abrir a caixa de diálogo «Dividir Células».
- Selecione o intervalo de células que contém o texto que deseja dividir.
- Selecione a opção «Dividir em Colunas».
- Selecione «Vírgula» (ou qualquer outro delimitador necessário) e clique em «OK».
- Selecione uma célula de destino e clique em «OK» para obter todos os dados divididos.
Dividir valores separados por vírgulas em linhas diferentes
Esta secção apresenta dois métodos para dividir valores separados por vírgulas em linhas distintas no Excel. Siga os passos abaixo.
Dividir valores separados por vírgulas em várias linhas com VBA
Para dividir valores separados por vírgulas em linhas distintas, basta aplicar o seguinte código VBA.
1. Prima simultaneamente as teclas «Alt» + «F11» para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Na janela «Microsoft Visual Basic para Aplicações», clique em «Inserir» > «Módulo» e, de seguida, copie e cole o seguinte código VBA na janela do módulo.
Código VBA: Dividir valores separados por vírgulas em linhas
Sub SplitAll()
Dim xRg As Range
Dim xRg1 As Range
Dim xCell As Range
Dim I As Long
Dim xAddress As String
Dim xUpdate As Boolean
Dim xRet As Variant
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count > 1 Then
MsgBox "You can't select multiple columns", , "Kutools for Excel"
Exit Sub
End If
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
Set xRg1 = xRg1.Range("A1")
If xRg1 Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
xRet = Split(xCell.Value, ",")
xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
I = I + UBound(xRet, 1) + 1
Next
Application.ScreenUpdating = xUpdate
End Sub3. Prima a tecla «F5» para executar o código. Na caixa de diálogo «Kutools para Excel» que aparece, selecione as células que deseja dividir e clique em «OK».
4. Na segunda caixa de diálogo que aparece, «Kutools para Excel», selecione a célula onde pretende colocar os valores divididos e clique em «OK».
Pode então verificar que os valores separados por vírgulas nas células selecionadas foram divididos em linhas, conforme ilustrado na imagem seguinte.
Divida facilmente valores separados por vírgulas em linhas com o Kutools para Excel
O código VBA é demasiado complexo para utilizadores inexperientes do Excel o adaptarem às suas necessidades. Neste caso, a funcionalidade «Dividir Células» do «Kutools para Excel» permite-lhe dividir facilmente valores separados por vírgulas em várias linhas no Excel.
Após instalar o Kutools para Excel, selecione «Kutools» > «Mesclar e Dividir» > «Dividir Células» para abrir a caixa de diálogo «Dividir Células».
- Selecione o intervalo de células que contém os valores separados por vírgulas que deseja dividir.
- Selecione a opção «Dividir em Linhas».
- Selecione «Vírgula» (ou qualquer outro delimitador necessário) e clique em «OK».
- Selecione uma célula de destino e clique em «OK» para obter todos os dados divididos.
Demonstração: Divida rapidamente valores separados por vírgulas em linhas ou colunas com o Kutools para 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