Divida valores separados por vírgula em linhas/colunas no Excel - guia fácil

Em determinadas situações, pode ser necessário dividir valores separados por vírgula de células selecionadas em linhas ou colunas individuais. Este guia explora diferentes métodos eficazes para ajudá-lo a realizar essa tarefa, fornecendo instruções passo a passo para garantir que você consiga gerenciar e reorganizar seus dados de forma eficiente conforme suas necessidades.

Dividir valores separados por vírgula em diferentes colunas

• Com o assistente Texto para Colunas
• Facilmente com Kutools (dividir por qualquer delimitador)

Dividir valores separados por vírgula em diferentes linhas

• Com código VBA
• Facilmente com Kutools (dividir por qualquer delimitador)

Dividir valores separados por vírgula em diferentes colunas

Para dividir valores separados por vírgula em células selecionadas em diferentes colunas, experimente os métodos desta seção.

Use o assistente Texto para Colunas para dividir valores separados por vírgula em colunas

Para dividir valores separados por vírgula em células selecionadas em colunas, o método mais comumente usado é o assistente Texto para Colunas no Excel. Aqui, mostrarei passo a passo como utilizar esse assistente para alcançar o resultado desejado.

1. Selecione o intervalo de células que deseja dividir em colunas e clique em "Dados" > "Texto para Colunas". Veja a captura de tela:

2. Na primeira caixa de diálogo "Converter Texto em Colunas", selecione a opção "Delimitado" e clique no botão "Avançar".

3. Na segunda caixa de diálogo "Converter Texto em Colunas", marque apenas a caixa "Vírgula" na seção "Delimitadores" e clique em "Avançar".

4. Na última caixa de diálogo "Converter Texto em Colunas", selecione uma célula para localizar os valores divididos na caixa "Destino" e, por fim, clique em "Concluir".

Agora todos os valores nas células selecionadas que estavam separados por vírgulas foram divididos em diferentes colunas, conforme mostrado na captura de tela abaixo.

Divida facilmente valores separados por vírgula em várias colunas com Kutools

Como você pode ver, o assistente "Texto para Colunas" exige várias etapas para concluir a tarefa. Se precisar de um método mais simples, o recurso "Dividir Células" do "Kutools para Excel" é altamente recomendado. Com esse recurso, é possível dividir células em várias colunas ou linhas com base em um delimitador específico, completando as opções em uma única caixa de diálogo.

Após instalar o Kutools para Excel, selecione "Kutools" > "Mesclar & Dividir" > "Dividir Células" para abrir a caixa de diálogo "Dividir Células".

1. Selecione o intervalo de células que contém o texto que deseja dividir.
2. Selecione a opção "Dividir Dados".
3. Selecione "Vírgula" (ou qualquer delimitador necessário) e clique em "OK".
   
   
4. Selecione uma célula de destino e clique em "OK" para obter todos os dados divididos.
   
   

Dividir valores separados por vírgula em diferentes linhas

Esta seção demonstra dois métodos para ajudá-lo a dividir valores separados por vírgula em diferentes linhas no Excel. Siga os passos abaixo.

Dividir valores separados por vírgula em várias linhas com VBA

Para dividir valores separados por vírgula em linhas, você pode aplicar o código VBA a seguir.

1. Pressione as teclas "Alt" + "F11" simultaneamente para abrir a janela "Microsoft Visual Basic for Applications".

2. Na janela "Microsoft Visual Basic for Applications", clique em "Inserir" > "Módulo". Em seguida, copie e cole o código VBA abaixo na janela do Módulo.

Código VBA: Dividir valores separados por vírgula 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 Sub

3. Pressione a tecla "F5" para executar o código. Na caixa de diálogo "Kutools para Excel" que aparecer, selecione as células que deseja dividir e clique no botão "OK".

4. Na segunda caixa de diálogo "Kutools para Excel" que aparecer, selecione uma célula para localizar os valores divididos e clique em "OK".

Em seguida, você verá que os valores separados por vírgula nas células selecionadas foram divididos em linhas, conforme mostrado na captura de tela abaixo.

Divida facilmente valores separados por vírgula em linhas com Kutools para Excel

O código VBA pode ser difícil para iniciantes no Excel adaptarem às suas necessidades. Aqui, o recurso "Dividir Células" do "Kutools para Excel" também pode ajudar a dividir facilmente valores separados por vírgula em várias linhas no Excel.

Após instalar o Kutools para Excel, selecione "Kutools" > "Mesclar & Dividir" > "Dividir Células" para abrir a caixa de diálogo "Dividir Células".

1. Selecione o intervalo de células que contém os valores separados por vírgula que deseja dividir.
2. Selecione a opção "Dividir em Linhas".
3. Selecione "Vírgula" (ou qualquer delimitador necessário) e clique em "OK".
   
   
4. Selecione uma célula de destino e clique em "OK" para obter todos os dados divididos.
   
   

Demonstração: Divida rapidamente valores separados por vírgula em linhas ou colunas com Kutools para Excel