Skip to main content

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

Author: Xiaoyang Last Modified: 2025-08-06

Ao usar a planilha do Excel, às vezes, você pode se deparar com este problema: como 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.

original data arrow right convert range to single column

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

Transpor/Converter colunas e linhas em uma única coluna com Kutools para Excelgood idea3

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 seguinte fórmula longa pode ajudá-lo a transpor rapidamente um intervalo de dados em uma coluna, por favor, faça o seguinte:

1. Primeiro, defina um nome de intervalo para seus dados, selecione os dados que deseja converter, clique com o botão direito e escolha Definir Nome no menu de contexto. Na caixa de diálogo Novo Nome, insira o nome do intervalo desejado. Em seguida, clique em OK. Veja a captura de tela:

define a range name for the range of data

2. Após especificar o nome do intervalo, clique em uma célula em branco; neste exemplo, clicarei na célula E1, e então insira esta fórmula: =ÍNDICE(MeusDados,1+INT((LIN(A1)-1)/COLUNAS(MeusDados)),MOD(LIN(A1)-1+COLUNAS(MeusDados),COLUNAS(MeusDados))+1).

Observação: MeusDados é o nome do intervalo dos dados selecionados, você pode alterá-lo conforme necessário.

3. Em seguida, arraste a fórmula para baixo até que a mensagem de erro seja exibida. Todos os dados no intervalo foram transpostos para uma única coluna. Veja a captura de tela:

 input a formula to get the result


Transpor/Converter colunas e linhas em uma única coluna com Kutools para Excel

Talvez a fórmula seja muito longa para lembrar e o código VBA tenha algumas limitações para você; nessa situação, não se preocupe, aqui vou apresentar uma ferramenta mais fácil e multifuncional - Kutools para Excel, com sua utilidade Transformar Intervalo, e você poderá resolver esse problema rapidamente e de forma conveniente.

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 gratuitamente o Kutools para Excel, siga os passos abaixo:

1. Selecione o intervalo que deseja transpor.

2. Clique em Kutools > Transformar Intervalo, veja a captura de tela:

click Transform Range feature of kutools

3. Na caixa de diálogo Transformar Intervalo, selecione a opção Intervalo para Coluna Única, veja a captura de tela:

select Range to single column option

4. Em seguida, clique em OK e especifique uma célula para colocar o resultado na caixa pop-up.

specify a cell to put the result

5. Clique OK, e os dados de várias colunas e linhas foram transpostos para uma única coluna.
the range data has been transposed into a one column

Se você quiser converter uma coluna em um intervalo com linhas fixas, também pode usar a função Transformar Intervalo para lidar com isso rapidamente.
convert one column to a range with kutools


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

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

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

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 a tecla F5 para executar o código, e uma caixa de diálogo será exibida para você selecionar um intervalo para converter. Veja a captura de tela:

vba code to select the data range

4. Em seguida, clique em Ok, e outra caixa de diálogo será exibida para selecionar uma célula para colocar o resultado, veja a captura de tela:

vba code to select a cell to put the result

5. E clique em Ok, então os conteúdos das células do intervalo são convertidos em uma lista de coluna, veja a captura de tela:

vba code to get the result


Artigos relacionados:

Como alterar 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 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!