Como transpor a cada 5 ou n linhas de uma coluna para várias colunas?
Suponha que você tenha dados longos na coluna A e agora queira transpor a cada 5 linhas da coluna A para várias colunas, como transpor A1: A5 para C6: G6, A6: A10 para C7: G7 e assim por diante como seguinte captura de tela mostrada. Como você poderia lidar com essa tarefa sem copiar e colar repetidamente no Excel?
Transponha a cada 5 ou n linhas de uma coluna para várias colunas com fórmula
Transponha a cada 5 ou n linhas de uma coluna para várias colunas com código VBA
Transponha cada 5 ou n linhas de uma coluna para várias colunas com o Kutools para Excel
Transponha a cada 5 ou n linhas de uma coluna para várias colunas com fórmula
No Excel, você pode aplicar a seguinte fórmula para transpor a cada n linhas de uma coluna para várias colunas. Faça o seguinte:
1. Insira a seguinte fórmula em uma célula em branco onde deseja colocar o resultado, C1, por exemplo, = ÍNDICE ($ A: $ A, LINHA (A1) * 5-5 + COLUNA (A1)), veja a captura de tela:
Note: Na fórmula acima, A: A é a referência da coluna que você deseja transpor, e A1 é a primeira célula da coluna usada, o número 5 indica o número de colunas que seus dados irão localizar, você pode alterá-las conforme sua necessidade. E a primeira célula da lista deve estar localizada na primeira linha da planilha.
2. Em seguida, arraste a alça de preenchimento para a direita para cinco células e continue arrastando a alça de preenchimento para o intervalo de células até exibir 0, veja a captura de tela:
Transforme a cada 5 ou n linhas de uma coluna em várias colunas:
Para transformar a cada 5 ou n linhas de uma coluna em várias colunas, Kutools for Excel's Faixa de transformação O utilitário pode ajudá-lo a resolver esse trabalho o mais rápido possível. Também pode ajudá-lo a transpor um intervalo de dados para uma única linha ou coluna. Clique para baixar o Kutools para Excel! Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora! |
Transponha a cada 5 ou n linhas de uma coluna para várias colunas com código VBA
Se você não pode aplicar a fórmula corretamente, o seguinte código VBA também pode ajudá-lo.
1. Segure 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.
Código VBA: transponha a cada 5 ou n linhas de uma coluna para várias colunas:
Public Sub TransposeData()
'updateby Extendoffice
Dim xLRow As Long
Dim xNRow As Long
Dim i As Long
Dim xUpdate As Boolean
Dim xRg As Range
Dim xOutRg As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select data range(only one column):", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If (xRg.Columns.Count > 1) Or _
(xRg.Areas.Count > 1) Then
MsgBox "the used range only contain one column", , "Kutools for Excel"
Exit Sub
End If
Set xOutRg = Application.InputBox("please select output range(specify one cell):", "Kutools for Excel", xTxt, , , , , 8)
If xOutRg Is Nothing Then Exit Sub
Set xOutRg = xOutRg.Range(1)
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
xLRow = xRg.Rows.Count
For i = 1 To xLRow Step 5
xRg.Cells(i).Resize(5).Copy
xOutRg.Offset(xNRow, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
xNRow = xNRow + 1
Next
Application.ScreenUpdating = xUpdate
End Sub
3. Depois de colar o código, pressione F5 para executá-lo e uma caixa de prompt aparecerá para lembrá-lo de selecionar a coluna que deseja transpor, consulte a captura de tela:
4. Então clique OKe selecione uma célula onde deseja colocar o resultado em outra caixa exibida, consulte a captura de tela:
5. E clique em OK, os dados na coluna foram convertidos em cinco colunas de que você precisa, consulte a captura de tela:
Note: No código acima, você pode alterar o número 5 para outro número que você precisa.
Transponha cada 5 ou n linhas de uma coluna para várias colunas com o Kutools para Excel
Se você tem Kutools for Excel, Com o seu Faixa de transformação utilitário, você pode transpor rapidamente uma coluna ou linha para várias colunas e linhas.
Kutools for Excel : com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. |
Depois de instalar Kutools for Excel, faça o seguinte:
1. Selecione os dados na coluna e clique em Kutools > Variação > Faixa de transformação, veja a captura de tela:
2. No Faixa de transformação caixa de diálogo, selecione Coluna única para intervalo opção sob o Tipo de transformação, e então verifique Valor fixo sob a Linhas por registroe especifique o número de colunas que deseja transpor no Valor fixo caixa, veja a captura de tela:
3. E, em seguida, clique em Ok botão, na caixa exibida, selecione uma célula para gerar o resultado, consulte a captura de tela:
4. Então clique OK botão, e os dados da coluna foram transpostos a cada 5 linhas, conforme mostrado a seguir:
Baixe e teste grátis Kutools para Excel agora!
Demonstração: transponha cada 5 ou n linhas de uma coluna para várias colunas com o Kutools para Excel
Melhores ferramentas de produtividade de escritório
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!