Question

在Excel中，将单独一列但多行的数据，按每固定的N行转换成多行N列的表格？

如图，到查看 预约/预购结束，换一行；就是每8个单元格换新的一行。

Answer 1

用函数方法来解决！
B2=OFFSET($A$1，ROW(A1)-1+(COLUMN(A1)-1)*8，0)
向下拖动8行，向右拖动3列

Answer 2

贴主， 请下载参考链接处的下载文件，提取码: cl1jca9c
打开此文件时， 请选择 “启用宏”， 启动程序 请用CTRL+R键。

程序会把A列数据，按8行一列，分到B列开始的多列上。 请注意的一点，多列别超过你EXCEL的最大列数。

Alft + F11, 可以查看到程序代码， 如下：
Sub dd()
Dim i&, c&, n&, ar()
n = 8
c = Sheet1.[A65536].End(xlUp).Row
ReDim ar(c \ n, n)
For i = 1 To c
ar((i - 1) \ n, (i - 1) Mod n) = Sheet1.Cells(i, 1)
Next
Sheet1.[B1].Resize(UBound(ar, 2) + 1, UBound(ar, 1) + 1) = WorksheetFunction.Transpose(ar)
End Sub

Answer 3

写个简单的宏处理一下就可以。