Como Dividir o Conteúdo de uma Célula em Várias Linhas no Excel (Cenários + Comparação de Ferramentas)

=TRANSPOSE(TEXTSPLIT(A1,","))Dica: Você pode alterar o delimitador "," para ";" ou "|" dependendo de como seus dados estão separados.

Passo 2. Pressione a tecla Enter.

Prós	Contras
Totalmente dinâmico e atualiza automaticamente com mudanças. Não são necessários plugins ou passos manuais.	Funciona apenas nas versões do Excel que suportam TEXTSPLIT e matrizes dinâmicas (Excel 365).

---

Método 3: Power Query – Dividir e Expandir Linhas (Microsoft 2016 e versões posteriores)

Power Query é ideal para operações estruturadas e repetitivas. É poderoso, refrescante e ótimo para transformações de dados em lote.

Indicado para: Ambos os Cenários 1 (Dividir Apenas a Célula Alvo) e Cenário 2 (Dividir Célula e Manter Dados de Outras Colunas)

Passos: Tome o Cenário 1 (Dividir Apenas a Célula Alvo) como Exemplo

Passo 1. Selecione seu intervalo, vá para Dados > Obter & Transformar > Da Tabela/Intervalo.

um 

Passo 2. Na Criar Tabela, clique em OK. (Se o intervalo selecionado tiver cabeçalhos, marque Minha tabela tem cabeçalhos.)

Passo 3. No Editor do Power Query, use Dividir Coluna por Delimitador.

Passo 4. Selecione ou insira o delimitador, e então clique em Avançado para expandir as opções, selecione Dividir em Linhas, depois clique em OK.

Passo 5. Selecione Fechar & Carregar > Fechar & Carregar ou Fechar & Carregar Para.

Os mesmos passos se aplicam ao Cenário 2 (Dividir Células Enquanto Preserva Dados de Outras Colunas) - vamos examinar os resultados.

O intervalo de células alvo:

Resultado:

Nota: Na janela do Editor do Power Query, selecione apenas a coluna alvo que deseja dividir em linhas, depois clique em Por Delimitador sob Dividir Coluna.

Prós	Contras
Totalmente automatizado. Escalabilidade excelente com os dados.	Requer um pouco de aprendizado. Atualização necessária para novos dados..

Dica: Adicione etapas Trim e Clean para corrigir espaços em branco ou caracteres especiais.

---

Método 4: Plugin Kutools – Clique para Dividir

Se você frequentemente divide células e prefere uma solução baseada em GUI, o Kutools é uma excelente ferramenta. Ele simplifica operações complexas em poucos cliques.

Indicado para: Ambos os Cenários 1 (Dividir Apenas a Célula Alvo) e Cenário 2 (Dividir Célula e Manter Dados de Outras Colunas)

Passos: Cenário 1 (Dividir Apenas a Célula Alvo)

Passo 1. Selecione a célula alvo.

Passo 2. Vá para Kutools > Mesclar & Dividir > Dividir Células.

Passo 3. Escolha Dividir em Linhas e defina o delimitador. Clique em OK./p>

Passo 4. Selecione uma célula de destino. Clique em OK.

Baixar Agora

Passos: Cenário 2 (Dividir Célula e Manter Dados de Outras Colunas)

Passo 1. Selecione a coluna que deseja dividir em linhas.

Passo 2. Vá para Kutools > Mesclar & Dividir > Dividir Dados para Linhas.

Passo 3. Defina o delimitador. Clique em OK.

Os mesmos passos se aplicam ao Cenário 2 (Dividir Células Enquanto Preserva Dados de Outras Colunas) - vamos examinar os resultados.

O intervalo de células alvo:

Resultado:

Prós	Contras
Muito fácil de usar. Pode lidar com grandes volumes com poucos cliques.	Requer plugin (nem todos os recursos são gratuitos).

Baixar Agora

Nota: A versão Trial de 30 dias oferece toda a funcionalidade para teste.

---

Método 5: Script VBA – Controle Total Personalizado

Para usuários com conhecimento de programação, o VBA oferece flexibilidade total. Você pode adaptar scripts para corresponder exatamente ao layout de seus dados e às suas regras de negócio.

Indicado para: Ambos os Cenários 1 (Dividir Apenas a Célula Alvo) e Cenário 2 (Dividir Célula e Manter Dados de Outras Colunas)

Passos:

Passo 1. Pressione Alt + F11 para abrir o editor VBA.

Passo 2. Clique em Inserir > Módulo.

Passo 3. Copie e cole o VBA abaixo.

Cenário 1 - Dividir Apenas a Célula Alvo

'Update by Extendoffice
Sub SplitCellToRows_Simple()
    Dim InputCell As Range
    Dim Values As Variant
    Dim i As Long

  
    Set InputCell = Range("A1") ' change A1 to your target cell

    Values = Split(InputCell.Value, ",") 
    For i = 0 To UBound(Values)
        InputCell.Offset(i, 1).Value = Trim(Values(i))
    Next i
End Sub

Cenário 2 - Dividir Célula e Manter Dados de Outras Colunas

'Update by Extendoffice
Sub SplitRowsWithOtherColumns()
    Dim ws As Worksheet
    Dim LastRow As Long, i As Long
    Dim arr As Variant, j As Long
    Dim SplitVals As Variant
    Dim CurrentRow As Long

    Set ws = ActiveSheet
    LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    For i = LastRow To 2 Step -1
        If InStr(ws.Cells(i, 2).Value, ",") > 0 Then
            SplitVals = Split(ws.Cells(i, 2).Value, ",")

            For j = UBound(SplitVals) To 1 Step -1
                ws.Rows(i + 1).Insert Shift:=xlDown
                ws.Cells(i + 1, 1).Value = ws.Cells(i, 1).Value
                ws.Cells(i + 1, 2).Value = Trim(SplitVals(j))
            Next j

            ws.Cells(i, 2).Value = Trim(SplitVals(0))
        End If
    Next i
End Sub

Nota: Este script VBA está configurado para funcionar especificamente quando seus dados estão localizados nas colunas A a B e os valores a serem divididos estão na coluna B.

Contras

Deve ser salvo como um arquivo habilitado para macro (.xlsm) para preservar o script para uso futuro.

💡Dicas:

• Sempre faça backup dos seus dados antes de executar uma macro.
• Substitua "," no script pelo seu delimitador real (ex.: ";" para ponto e vírgula ou "|" para caracteres de barra) para corresponder ao formato dos seus dados.

---

Problemas Comuns

• Linhas ou colunas em branco: Geralmente causado por delimitadores finais ou espaços ocultos.
• Erros de células mescladas: Desmesclar células antes de começar.
• Power Query não atualizando: Lembre-se de clicar em Atualizar após modificar os dados de origem.
• Delimitador errado: Um erro de ponto e vírgula vs vírgula pode comprometer todo o resultado.

---

Artigos Relacionados:

• Utilitário Transpor Intervalo: Converta facilmente várias linhas em colunas e vice-versa no Excel
• Ferramenta Conversor de Unidade: Converta rapidamente números decimais em binários/octais/hexadecimais ou vice-versa