Ir para o conteúdo principal

Como dividir uma coluna longa em várias colunas no Excel?

doc dividido em várias colunas 4
Se você tiver uma coluna longa de dados no Excel, isso será problemático ao visualizá-los. Mas agora, se você puder dividir essa longa lista em várias colunas no Excel, a visualização será conveniente.
Divida a coluna longa em várias colunas com VBA
Divida uma coluna longa em várias colunas com o Kutools para Excel boa ideia 3

seta azul bolha direita Divida a coluna longa em várias colunas com VBA

1. Pressione Alt + F11 chaves juntas para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Módulo e copie o seguinte código VBA para a janela aberta.

VBA: divida a coluna longa em várias colunas.

Sub SplitColumn()
	'Updateby20141106
	Dim rng As Range
	Dim InputRng As Range
	Dim OutRng As Range
	Dim xRow As Integer
	Dim xCol As Integer
	Dim xArr As Variant
	xTitleId     = "KutoolsforExcel"
	Set InputRng = Application.Selection
	Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type: = 8)
	xRow         = Application.InputBox("Rows :", xTitleId)
	Set OutRng   = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
	Set InputRng = InputRng.Columns(1)
	xCol         = InputRng.Cells.Count / xRow
	ReDim xArr(1 To xRow, 1 To xCol + 1)
	For i = 0 To InputRng.Cells.Count - 1
		xValue = InputRng.Cells(i + 1)
		iRow = i Mod xRow
		iCol = VBA.Int(i / xRow)
		xArr(iRow + 1, iCol + 1) = xValue
	Next
	OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub

3. Clique Execute ou pressione F5 para executar o VBA e uma caixa de diálogo apareceu para selecionar a lista de dados e clique em OK para ir para especificar quantas linhas em uma coluna você precisa na próxima caixa de diálogo, a seguir clique OK e selecione uma célula para produzir o resultado. Veja as capturas de tela:

doc-dividido em múltiplas colunas-1
seta doc
doc-dividido em múltiplas colunas-2
seta doc
doc-dividido em múltiplas colunas-3


4. Clique OK, então você pode ver que a coluna longa é dividida em várias colunas e cada coluna tem 15 células.
doc-dividido em múltiplas colunas-4


seta azul bolha direita Divida uma coluna longa em várias colunas com o Kutools para Excel

Talvez alguns de vocês não gostem de usar código VBA, felizmente, você pode usar o Faixa de transformação utilidade de Kutools for Excel para converter rápida e facilmente uma coluna longa em um número fixo de colunas.

Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. 

Depois de instalar Kutools para Excel, faça o seguinte:(Baixe gratuitamente o Kutools para Excel agora!)

1. Selecione os dados da coluna que deseja dividir e clique em Kutools > Variação > Faixa de transformação. Veja a imagem:
documento dividido kte 1

2. Na caixa de diálogo exibida, verifique Coluna única para intervalo opção, então verifique Valor fixo opção e digite o número de colunas que você precisa na caixa de texto. Veja a imagem:documento dividido kte 2

3. Clique Ok e selecione uma única célula para colocar os dados divididos. Veja a imagem:
documento dividido kte 3

4. Clique OK para terminar as operações. Agora, os dados da coluna longa foram divididos em três colunas.
documento dividido kte 4

É mais fácil do que o código VBA? Com TIntervalo de ransform utilitário, você pode converter uma linha em intervalo, um intervalo em uma linha ou uma coluna.

seta azul bolha direita Transponha coluna / linha única para um intervalo ou vice-versa



Divida rapidamente uma célula em colunas ou linhas com base no delimitador

No Excel, dividir uma célula em colunas é tedioso com o assistente passo a passo. Mas com Kutools for Excel's Dividir células utilitário, você pode: 1, converter uma célula em colunas ou linhas com base no delimitador; 2, converter string em texto e número; 3, converta string com base na largura específica, com cliques.  Clique para um teste gratuito completo de 30 dias!
doc divisão celular
 
Kutools para Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias.

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Really awesome...
This comment was minimized by the moderator on the site
Thank you so much!It's a big problem to copy web table to Excel.Thanks to your script I finally managed it.
This comment was minimized by the moderator on the site
Thank you!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations