Como dividir valores de células verticalmente no Excel?
Ao trabalhar no Excel, você pode encontrar situações em que vários valores em uma única linha ou várias linhas precisam ser convertidos em uma lista vertical. Isso é especialmente útil quando os dados estão armazenados em formato horizontal, mas precisam ser processados ou analisados em formato de coluna.
Este guia abordará três métodos eficientes para converter valores de células verticalmente:
Dividir valores de células em linhas verticalmente no Excel
- Usando uma Fórmula (Excel 365) – Ideal para transformações dinâmicas e automáticas
- Usando Kutools para Excel – Uma solução rápida e fácil com uma ferramenta especializada para todas as versões do Excel
- Usando Código VBA – Ideal para automatizar o processo para todas as versões do Excel
Divida os valores das células em linhas verticalmente por uma Fórmula (Excel 365)
Se você tiver o Excel 365, poderá usar as funções TEXTSPLIT, TEXTJOIN e TRANSPOSE para converter valores de células verticalmente sem esforço manual.
Por favor, copie e cole a seguinte fórmula em uma célula em branco e pressione a tecla "Enter", o Excel distribuirá automaticamente os dados em várias linhas, veja a captura de tela:
=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))
- TEXTJOIN(";", VERDADEIRO, A1:A4): Junta o texto nas células A1 a A4 em uma única sequência, separada por ponto e vírgula (;).
- TEXTSPLIT(...): Divide a sequência combinada novamente em valores separados usando o ponto e vírgula como delimitador.
- TRANSPOSE(...): Converte a lista vertical resultante de valores em uma linha horizontal (ou vice-versa, dependendo da orientação original).
✅ Prós:
- ✔ Atualizações Dinâmicas: Se os dados de origem mudarem, a fórmula atualiza automaticamente os resultados.
- ✔Sem Esforço Manual: Elimina a necessidade de divisões manuais repetitivas.
- ✔Delimitadores Personalizáveis: Substitua o ponto e vírgula (;) por qualquer delimitador (por exemplo, vírgula, espaço) para se adequar aos seus dados.
❌ Contras:
- ✘ Disponível apenas no Excel 365, não funciona em versões mais antigas do Excel.
Divida os valores das células em linhas verticalmente pelo Kutools para Excel
Se você usa o Excel 2019 ou anterior, pode usar o "Kutools para Excel" – um poderoso complemento com ferramentas especializadas para transformar e gerenciar dados facilmente. Com seu recurso "Dividir Dados em Linhas", você pode converter valores de células verticalmente de forma contínua com base em qualquer delimitador necessário.
Após instalar o "Kutools para Excel", siga estas instruções:
- Clique em "Kutools" > "Mesclar & Dividir" > "Dividir Dados em Linhas", veja a captura de tela:
- Na caixa de diálogo "Dividir Dados em Linhas", especifique as seguintes operações:
- Selecione as células que deseja dividir;
- Na seção "Delimitador", selecione o delimitador para definir como o conteúdo da célula deve ser dividido. Aqui, vou selecionar "ponto e vírgula".
- Finalmente, clique no botão "OK".
Resultado: Os dados serão convertidos em uma coluna vertical.
✅ Prós:
- ✔ Funciona em todas as versões do Excel (2010, 2013, 2016, 2019, 2021, 365)
- ✔Não é necessário usar fórmulas complexas ou codificação.
- ✔Suporta uma ampla gama de delimitadores.
- ✔O Kutools oferece mais de 300 ferramentas para manipulação de dados, economizando tempo em outras tarefas.
❌ Contras:
- ✘ Requer a instalação do Kutools
Divida os valores das células em linhas verticalmente por código VBA
Para usuários avançados, o VBA fornece uma solução robusta para automatizar a divisão vertical dos valores das células. O código VBA abaixo permite que você divida facilmente o conteúdo das células em linhas usando qualquer separador personalizado.
1. Mantenha pressionadas as teclas "ALT" + "F11" para abrir a janela "Microsoft Visual Basic for Applications".
2. Clique em "Inserir" > "Módulo" e cole o seguinte código na janela "Módulo".
Código VBA: Divida os valores das células em linhas verticalmente por separador específico
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. Em seguida, pressione a tecla "F5" para executar este código, e uma caixa de prompt aparecerá para lembrá-lo de selecionar os valores das células que deseja dividir verticalmente, veja a captura de tela:
4. E depois clique no botão "OK", outra caixa aparecerá para lembrá-lo de selecionar uma célula para colocar o resultado, veja a captura de tela:
5. Clique no botão "OK" e os valores das células terão sido divididos em uma lista por um separador, veja a captura de tela:
✅ Prós:
- ✔Automatiza o processo, economizando tempo
- ✔Funciona em todas as versões do Excel
- ✔Pode ser personalizado para diferentes delimitadores
❌ Contras:
- ✘ Requer conhecimento básico de programação VBA
- ✘ Um pouco complexo para iniciantes
Converter valores de células verticalmente no Excel pode ser alcançado por meio de vários métodos, cada um com suas próprias vantagens. Ao entender esses métodos, você pode escolher a melhor abordagem para suas necessidades específicas e otimizar seu fluxo de trabalho no Excel. Seja você um iniciante ou um usuário avançado, essas ferramentas e técnicas ajudarão você a lidar com os dados de forma mais eficaz e eficiente. 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
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!