excel一列数据怎么分成三行

将Excel一列数据分成三行的方法包括使用公式、手动复制粘贴、和Power Query等。 这里将详细介绍使用公式的方法，具体步骤如下：假设你的数据在A列，从A1开始，你可以使用公式在B列、C列和D列进行数据分割。比如在B1中输入=INDEX($A:$A,ROW()*3-3+COLUMN()-2)，然后向右拖动公式到D列，再向下拖动公式到需要的位置。

下面将详细介绍使用公式、手动复制粘贴、和Power Query的方法来实现这一目标。

一、使用公式

1、准备工作和公式介绍

在Excel中，可以通过公式将一列数据分成多行。假设你的数据在A列，从A1开始。我们将使用INDEX函数和一些简单的数学运算来实现。

2、具体公式和步骤

1. 在B1中输入公式

在B1单元格中输入以下公式：

=INDEX($A:$A,ROW()*3-3+COLUMN()-2)

2. 向右和向下拖动公式

将B1中的公式向右拖动到D1，然后再将B1:D1的公式向下拖动到需要的行数。

3. 公式解析

ROW()*3-3：这个部分计算出当前行数据在原始列中的基准位置。例如，第一行（ROW()=1）基准位置是1，第二行（ROW()=2）基准位置是4，依此类推。
COLUMN()-2：这个部分计算出当前列相对于开始列的偏移。例如，B列（COLUMN()=2）偏移为0，C列（COLUMN()=3）偏移为1，依此类推。
INDEX($A:$A, ROW()*3-3+COLUMN()-2)：这个部分结合基准位置和偏移量，从A列中取出相应的数据。

二、手动复制粘贴

1、选择数据范围

首先，选择你要分割的数据范围。假设数据从A1到A100。

2、复制数据

复制这些数据（Ctrl+C）。

3、选择目标区域

选择目标区域，比如B1到D1。

4、粘贴数据

使用选择性粘贴功能，选择“转置”选项，将数据粘贴到新区域。这将把一列数据转置成一行数据。

5、手动调整

根据需要手动调整数据位置，确保每三行数据相邻。

三、使用Power Query

1、加载数据到Power Query

选择数据范围，点击“数据”选项卡，选择“从表/范围”。

2、添加索引列

在Power Query编辑器中，选择“添加列”选项卡，点击“索引列”，选择“从0开始”。

3、添加自定义列

添加一个自定义列，公式为Number.Mod([Index], 3) + 1。这会创建一个新的列，表示每一行应该归属于哪一列。

4、透视列

选择刚刚创建的自定义列，点击“转换”选项卡，选择“透视列”。

5、合并数据

将透视后的数据合并，完成数据分割。

四、使用VBA宏

1、打开VBA编辑器

按下Alt+F11打开VBA编辑器。

2、插入新模块

点击“插入”，选择“模块”。

3、输入代码

在模块中输入以下代码：

Sub SplitColumnToRows()
    Dim i As Long, j As Long, k As Long
    Dim SourceRange As Range
    Dim TargetRange As Range
    Set SourceRange = Range("A1:A100") ' 修改为你的数据范围
    Set TargetRange = Range("B1")
    k = 0
    For i = 1 To SourceRange.Rows.Count Step 3
        For j = 0 To 2
            If i + j <= SourceRange.Rows.Count Then
                TargetRange.Offset(k, j).Value = SourceRange.Cells(i + j, 1).Value
            End If
        Next j
        k = k + 1
    Next i
End Sub

4、运行宏

关闭VBA编辑器，按下Alt+F8，选择“SplitColumnToRows”，点击“运行”。

通过以上详细介绍的四种方法，你可以轻松地将Excel一列数据分成三行。每种方法都有其独特的优点和适用场景，你可以根据实际需要选择合适的方法。

五、使用数组公式

1、准备工作

假设你的数据在A列，从A1开始。

2、输入数组公式

在B1中输入以下公式：

=INDEX($A$1:$A$100, INT((ROW(A1)-1)/3)*3 + COLUMN(A1))

3、向右和向下拖动公式