[Solved] Convert Multiple Rows into Single Column in Excel [closed]

by


Use the following VBA code to transpose data with spaces. This will not remove the original code.

Sub Transpose()
Dim rng As Range
Dim i As Long
Dim j As Long
Set rng = Cells(Rows.Count, 1).End(xlUp)
j = 1
For i = 1 To rng.Row Step 5
Cells(j, "B").Resize(1, 5).Value = _
Application.Transpose(Cells(i, "A").Resize(6, 1))
j = j + 1
Next
End Sub

source

3

solved Convert Multiple Rows into Single Column in Excel [closed]