如何在 Excel 中轻松快速地转置和堆叠数据？

在处理电子表格时，转置和堆叠数据是重要的操作，因为它们允许您重新排列和重组数据，以便更好地进行分析和显示。Excel 具有强大的功能，可以将行转换为列，反之亦然，以及将多个数据集堆叠到单个列或行中。

在本文中，我们将探讨在 Excel 中转置和堆叠数据的多种方法，并考虑不同的上下文和 Excel 版本。因此，让我们开始了解如何在 Excel 中轻松快速地转置和堆叠数据！

轻松快速地转置范围和堆叠数据

在这里，我们将首先创建一个 VBA 模块，然后运行它来完成任务。因此，让我们看一个简单的过程来学习如何在 Excel 中轻松快速地转置范围和堆叠数据。

步骤 1

考虑一个 Excel 表格，其中您拥有类似于下图的范围数据。

首先选择单元格范围，然后右键单击工作表名称并选择“查看代码”以打开 VBA 应用程序。然后，单击“插入”并选择“模块”。

选择单元格 > 右键单击 > 查看代码 > 插入 > 模块。

步骤 2

然后将以下代码复制到文本框中。

代码

Sub ConvertTableToList()
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step −1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step −1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub

步骤 3

然后单击 F5 运行代码以完成任务。

结论

在本教程中，我们使用了一个简单的示例来演示如何在 Excel 中轻松快速地转置和堆叠数据，以突出显示特定数据集。

Pradeep Kumar

更新于： 2023-07-13

168 次查看

开启您的 职业生涯

通过完成课程获得认证

立即开始