在excel中转换矩形表中的单列列表

我在Excel中有一个列表，其中包含大量数据，每行一个，列在Excel中。我想用它做一个长方形的表格，这样更容易查看和打印。我希望有一种方法可以很容易地完成，因为我不断地更改这个列表，每次打印文件时都必须生成表

例如： 我在第一列有以下数据（每行一个）：1、2、3、4、5、6、7、8

然后，我应用我正在寻找的方法，以便有3列。该表将如下所示：

1  2  3

4  5  6

7  8

你知道有没有一种自动的方法吗

---

谢谢大家!

在我看来，您可以用一个简单的宏来完成这项任务。我试图为您安排一些代码，供您参考：

Sub-columnRectangularTable（）
Dim sourceColumn As Range'这是要调整大小的列中第一个单元格的地址
Dim destinationCell As Range'这是矩形表的第一个单元格地址
Dim size As Integer'这是要用于调整原始列大小的列数
'您可能希望使用其他更适合您的参数或使用输入框来更改以下参数
Set sourceColumn=ActiveSheet.Range（“A1”）
Set destinationCell=ActiveSheet.Range（“H1”）
尺寸=3
'选择源列中用于填充矩形表的所有数据
“我选择自动将其添加到第一个空单元格。
“您可以根据需要更改此部分
sourceColumn.Select
Set SourceData=sourceColumn.Range（Selection，Selection.End（xlDown））
'在矩形列表中排列数据的过程
对于i=1到SourceData.Rows.Count
选择案例i模块大小
案例0
destinationCell.Offset（（i\size-1），（size-1））.Value=SourceData（i）.Value
其他情况
destinationCell.Offset（i\size，（i Mod size）-1.Value=SourceData（i）.Value
结束选择
下一个
端接头

---

您可以更改一些参数，以使此宏适应您的需要。您还可以修改部分代码，以采用不同的方法输入参数。

似乎还有一种方法可以仅使用公式将向量转换为矩阵。您可以在下面找到所有详细信息。