excel怎么让一列数字变成5个一列

在Excel中将一列数字变成5个一列，可以通过使用以下几种方法：使用公式、使用宏、手动分列。下面将详细介绍其中一种方法：使用公式。

使用公式： 通过使用Excel中的公式，可以快速将一列数字变成五个一列。首先，创建一个新的工作表或在当前工作表中选择一个新的区域，用于存放转换后的数据。然后，使用OFFSET和COLUMN函数的组合来重新排列数据。

一、使用公式重新排列数据

1. 创建新的工作表或区域

在当前工作表中选择一个新的区域，或创建一个新的工作表，准备存放重新排列后的数据。

2. 输入公式

在新的区域的第一个单元格中输入以下公式：

=OFFSET($A$1, (ROW() - 1) * 5 + (COLUMN() - COLUMN($B$1)), 0)

OFFSET函数用于从指定的起始单元格（$A$1）偏移一定的行数和列数，返回偏移后的单元格的值。
ROW()函数返回当前行的行号。
COLUMN()函数返回当前列的列号。
通过(ROW() – 1) * 5 + (COLUMN() – COLUMN($B$1))计算偏移的行数。

3. 拖动公式

将公式输入到第一个单元格后，按下Enter键，然后使用填充柄（单元格右下角的小方块）将公式向右拖动4个单元格，接着向下拖动直至覆盖所有需要重新排列的数据。

二、使用宏（VBA）重新排列数据

如果对VBA（Visual Basic for Applications）有一定了解，可以使用宏来实现这一功能。

1. 打开VBA编辑器

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

2. 创建新的模块

在VBA编辑器中，选择“插入”->“模块”，创建一个新的模块。

3. 输入宏代码

在新的模块中输入以下代码：

Sub RearrangeData()
    Dim SourceRange As Range
    Dim TargetRange As Range
    Dim i As Long, j As Long
    '定义源数据范围
    Set SourceRange = Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
    '定义目标数据起始单元格
    Set TargetRange = Range("B1")
    '遍历源数据并重新排列
    For i = 1 To SourceRange.Rows.Count Step 5
        For j = 0 To 4
            If i + j <= SourceRange.Rows.Count Then
                TargetRange.Offset(Int((i - 1) / 5), j).Value = SourceRange.Cells(i + j, 1).Value
            End If
        Next j
    Next i
End Sub

4. 运行宏

关闭VBA编辑器，回到Excel工作表，按下Alt + F8打开宏对话框，选择刚刚创建的宏RearrangeData，然后点击“运行”。

三、手动分列

1. 复制数据

将需要重新排列的数据列复制到一个新的区域。

2. 手动分列

将复制的数据手动分成5个一列。可以通过插入空白列来分隔数据，每5个单元格插入一个空白列，然后将数据移动到相应的位置。

四、总结

通过以上几种方法，可以轻松地将一列数字变成5个一列。使用公式方法适合数据量较小且对公式熟悉的用户，使用宏方法适合处理大量数据且对VBA有一定了解的用户，手动分列方法适合数据量较小且不熟悉公式和宏的用户。根据具体情况选择合适的方法，可以大大提高工作效率。