Skip to main content

Como dividir dados por delimitador e reorganizá-los em uma coluna no Excel?

Author: Sun Last Modified: 2025-08-06
split data by delimiter and rearrange it into a column

Ao trabalhar com o Excel, é comum encontrar células que contêm vários valores separados por vírgulas, ponto e vírgula ou outros delimitadores. Se você precisar dividir um intervalo dessas células por um delimitador específico e consolidar todos os valores resultantes em uma única coluna como mostrado na captura de tela abaixo, existem métodos eficientes para alcançar isso para uma melhor organização e análise de dados.

Dividir dados por delimitador e reorganizá-los em uma coluna


Divida os dados por delimitador e reorganize-os em uma coluna com uma fórmula (Excel 365)

No Excel 365, podemos realizar essa transformação dinamicamente usando funções modernas como as funções TEXTSPLIT e TEXTJOIN.

Clique na célula onde deseja colocar o resultado, insira a fórmula abaixo e pressione a tecla Enter. As células contendo cadeias de texto separadas por vírgulas são convertidas em uma lista imediatamente. Veja a captura de tela:

=TRANSPOSE(TEXTSPLIT(TEXTJOIN(", ", TRUE, A2:A5), ", "))
split data by delimiter and rearrange it into a column with formula

 

Explicação desta fórmula:
  • TEXTJOIN(",", VERDADEIRO, A2:A5): Combina todos os valores em A2:A5 em uma única cadeia de texto, separada por vírgulas.
  • TEXTSPLIT(..., ","): Divide o texto combinado em valores separados sempre que houver uma vírgula.
  • TRANSPOSE(...): Transforma a linha de valores resultante em uma coluna vertical.

Divida os dados por delimitador e reorganize-os em uma coluna com o Kutools para Excel

Para usuários que trabalham com versões antigas do Excel (2016/2019 etc., sem a função TEXTSPLIT), o recurso Dividir Dados em Linhas do Kutools para Excel oferece uma solução ideal. Esse recurso permite que você divida rapidamente o conteúdo das células em uma única coluna com base em um delimitador específico, economizando tempo e esforço.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

Após instalar o Kutools para Excel, siga os passos abaixo:

  1. Clique Kutools > Mesclar & Dividir > Dividir Dados em Linhas, veja a captura de tela:
    click Split Data to Rows feature of kutools
  2. Na Dividir Dados em Linhas caixa de diálogo, especifique as seguintes operações:
    • Selecione as células que deseja dividir;
    • Na seção Delimitador, escolha Outro, depois digite seu delimitador (por exemplo, uma vírgula e um espaço) para definir como o conteúdo da célula deve ser dividido;
    • Por fim, clique OK botão.
      specify the options in the dialog box

Resultado: As células selecionadas são divididas em uma coluna pelos delimitadores especificados.
split data by delimiter and rearrange it into a column with kutools

📝 Observação: Este método divide os dados diretamente na área de origem, então é aconselhável copiar e fazer backup dos dados originais antes de usá-lo.

Divida os dados por delimitador e reorganize-os em uma coluna com código VBA

Aqui, vamos guiá-lo sobre como usar o VBA para dividir o conteúdo das células por um delimitador e reorganizar os resultados em uma coluna.

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

2. Clique em Inserir > Módulo e cole o código abaixo na nova janela Módulo.

VBA: Dividir e Transpor

Sub Vertical()
'Updateby Extendoffice
    Dim i As Long, strTxt As String
    Dim startP As Range
    Dim xRg As Range, yRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox _
    (Prompt:="Range Selection...", _
    Title:="Kutools For Excel", Type:=8)
    i = 1
    Application.ScreenUpdating = False
    For Each yRg In xRg
        If i = 1 Then
            strTxt = yRg.Text
            i = 2
        Else
            strTxt = strTxt & "," & yRg.Text
        End If
    Next
    Application.ScreenUpdating = True
    Set startP = Application.InputBox _
    (Prompt:="paste range...", _
    Title:="Kutools For Excel", Type:=8)
    ary = Split(strTxt, ",")
    i = 1
    Application.ScreenUpdating = False
    For Each a In ary
        startP(i, 1).Value = a
        i = i + 1
    Next a
    Application.ScreenUpdating = True
End Sub

3. Pressione F5 tecla para executar o código, uma caixa de diálogo aparece para você selecionar um intervalo para dividir e transpor.
vba code to select the data list

4. Clique OK. Uma caixa de diálogo aparece para selecionar um local para colocar os dados.
vba code to select a cell to lit the result

5. Clique OK, e a seleção foi dividida e transposta por vírgula.
split data by delimiter and rearrange it into a column by vba code

Observação: No código, a vírgula em strTxt & "," e ary = Split(strTxt, ",") são os delimitadores que você usará para dividir os dados, você pode alterá-los conforme necessário.

🔚 Conclusão

Todos os métodos resolvem eficazmente o problema central de dividir dados delimitados, com a escolha ideal dependendo do seu nível de conforto técnico e requisitos específicos.

  • Para a maioria dos usuários do Excel 365, a abordagem de fórmula oferece o melhor equilíbrio entre poder e manutenibilidade.
  • Para transformações frequentes e complexas por não-programadores, o Kutools é ideal.
  • Para soluções personalizadas e automatizadas em ambientes empresariais, o VBA oferece o maior controle.

Escolha o método com base nas suas necessidades específicas. Se você estiver interessado em explorar mais dicas e truques do Excel, nosso site oferece milhares de tutoriais para ajudá-lo a dominar o Excel.

Melhores Ferramentas de Produtividade para Office

🤖 Kutools AI Aide: Revolucione a análise de dados com base em: Execução Inteligente|Gerar Código |Criar Fórmulas Personalizadas|Analisar Dados e Gerar Gráficos |Acionar Funções Aprimoradas
Recursos populares: Encontrar, Destacar ou Marcar Duplicados|Excluir Linhas em Branco|Combinar Colunas ou Células sem perder dados| Arredondar...
Super PROC: PROC com múltiplos critérios|PROC com múltiplos valores|Procura em várias planilhas|Correspondência Fuzzy....
Lista Suspensa Avançada: Crie rapidamente Lista Suspensa|Lista Suspensa Dependente|Lista Suspensa com Múltipla Seleção....
Gerenciador de Colunas: Adicionar um número específico de colunas |Mover Colunas |Alternar o Estado de Visibilidade de Colunas Ocultas| Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco|Visualização de Design|Barra de fórmulas aprimorada|Gerenciador de Pasta de Trabalho & Planilha|Biblioteca de AutoTexto|Selecionador de Data|Mesclar Dados |Criptografar/Descriptografar Células|Enviar Email por Lista|Super Filtro|Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ... ) |Mais de50 Tipos de Gráficos (Gráfico de Gantt, ... ) |Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ... ) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ... ) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ... ) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ... ) |... e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 outros!

Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo.Clique aqui para obter o recurso que você mais precisa...


Office Tab traz interface de abas para o Office e facilita muito seu trabalho

  • Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas abas da mesma janela, em vez de novas janelas.
  • Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!