Ir para o conteúdo principal
 

Como transpor / converter colunas e linhas em uma única coluna?

Autor: Xiao Yang Última modificação: 2024-08-21

Ao usar a planilha do Excel, às vezes, você encontrará este problema: como você poderia converter ou transpor um intervalo de dados em uma única coluna? (Veja as capturas de tela a seguir :) Agora, apresento três truques rápidos para você resolver esse problema.

dados originais seta para a direita converter intervalo em coluna única

Transpor / converter colunas e linhas em uma única coluna com fórmula

Transponha/converta colunas e linhas em uma única coluna com o Kutools para Excelboa ideia 3

Transpor / converter colunas e linhas em uma única coluna com código VBA


Transpor / converter colunas e linhas em uma única coluna com fórmula

A fórmula longa a seguir pode ajudá-lo a transpor rapidamente um intervalo de dados em uma coluna, faça o seguinte:

1. Primeiro, defina um nome de intervalo para o seu intervalo de dados, selecione os dados do intervalo que deseja converter, clique com o botão direito e escolha Definir o Nome formar o menu de contexto. No Novo nome caixa de diálogo, digite o nome do intervalo desejado. Então clique OK. Veja a imagem:

definir um nome de intervalo para o intervalo de dados

2. Depois de especificar o nome do intervalo, clique em uma célula em branco; neste exemplo, clicarei na célula E1 e, em seguida, inserirei esta fórmula: =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1).

Note: Meus dados é o nome do intervalo dos dados selecionados, você pode alterá-lo conforme necessário.

3. Em seguida, arraste a fórmula para baixo até a célula até que as informações do erro sejam exibidas. Todos os dados do intervalo foram transpostos para uma única coluna. Veja a imagem:

insira uma fórmula para obter o resultado


Transponha/converta colunas e linhas em uma única coluna com o Kutools para Excel

Talvez a fórmula seja muito longa para lembrar e o código VBA tenha alguma limitação para você, nesta situação, por favor, não se preocupe, aqui vou apresentar a você uma ferramenta mais fácil e multifuncional.Kutools for Excel, Com o seu Transform Range utilitário, e você pode resolver este problema de forma rápida e conveniente.

Kutools for Excel oferece mais de 300 recursos avançados para agilizar tarefas complexas, aumentando a criatividade e a eficiência. Aprimorado com recursos de IA, Kutools automatiza tarefas com precisão, facilitando o gerenciamento de dados. Informações detalhadas do Kutools para Excel ...         Teste grátis...

Depois de instalação grátis Kutools para Excel, faça o seguinte:

1. Selecione o intervalo que deseja transpor.

2. Clique Kutools > Transform Range, veja a captura de tela:

clique no recurso Transform Range do kutools

3. No Transform Range caixa de diálogo, selecione Range to single column opção, veja a captura de tela:

selecione a opção Intervalo para coluna única

4. Então clique OKe especifique uma célula para colocar o resultado da caixa pop-out.

especifique uma célula para colocar o resultado

5. Clique OK, e os dados de várias colunas e linhas foram transpostos para uma coluna.
os dados do intervalo foram transpostos para uma coluna

Se você deseja converter uma coluna em um intervalo com linhas fixas, você também pode usar o Transform Range função para lidar com isso rapidamente.
converta uma coluna em um intervalo com o kutools


Transpor / converter colunas e linhas em uma única coluna com código VBA

Com o código VBA a seguir, você também pode unir várias colunas e linhas em uma única coluna.

1. Mantenha pressionado o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o seguinte código no Módulo janela.

Sub ConvertRangeToColumn()
'Updateby20131126
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3. Pressione F5 para executar o código e uma caixa de diálogo é exibida para você selecionar um intervalo a ser convertido. Veja a imagem:

código vba para selecionar o intervalo de dados

4. Então clique Ok, e outra caixa de diálogo é exibida para selecionar uma única célula para exibir o resultado, consulte a captura de tela:

código vba para selecionar uma célula para colocar o resultado

5. E clique Ok, então o conteúdo da célula do intervalo é convertido em uma lista de uma coluna, veja a captura de tela:

código vba para obter o resultado


Artigos relacionados:

Como mudar de linha para coluna no Excel?

Como transpor / converter uma única coluna em várias colunas no Excel?

Como transpor / converter colunas e linhas em uma única linha?

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...


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!