1、使用Power Query可将多列数据通过“取消透视列”整合为一列；2、利用INDEX与ROW函数组合公式按列优先顺序提取数据；3、通过VBA宏自动遍历并合并非空单元格至目标列；4、手动复制各列并选择性粘贴转置实现简单合并。
如果您需要将Excel中多个列的数据整合到单一列中，以便于数据分析或报表生成，可以通过多种方式实现数据的合并。以下是几种常用的方法来完成这一操作。
本文运行环境：Dell XPS 13，Windows 11
一、使用Power Query合并多列
Power Query是Excel中强大的数据处理工具，适用于需要频繁进行数据转换和清洗的场景。通过它可轻松将多列数据堆叠为一列。
1、选中包含多列数据的区域，点击“数据”选项卡中的“从表格/区域”导入到Power Query。
2、在Power Query编辑器中，按住Ctrl键选择所有需要合并的列。
3、右键所选列，选择“取消透视列”，此时数据会被转换成两列：“属性”和“值”。
4、删除“属性”列，仅保留“值”列，然后点击“关闭并上载”将结果输出到工作表中。
二、使用公式法进行逐列合并
通过INDEX与ROW等函数组合，可以按顺序提取各列中的非空值，并将其排列到单一列中，适合对公式有一定掌握的用户。
1、确定原始数据范围，例如A1:C3，假定目标列从E1开始。
2、在E1单元格输入以下公式：
=INDEX($A:$C,INT((ROW(E1)-1)/COLUMNS($A:$C))+1,MOD(ROW(E1)-1,COLUMNS($A:$C))+1)
3、向下填充该公式，直到出现#REF!或空白为止，即可得到所有数据按列优先顺序排列的一列数据。
三、使用VBA宏自动化合并
VBA脚本能够快速遍历多个列并将每个单元格的值依次写入目标列，特别适合处理大量数据。
1、按下Alt + F11打开VBA编辑器，插入一个新模块。
2、粘贴以下代码：
Sub MergeColumnsToOne()
Dim rng As Range, cell As Range
Dim destCell As Range
Set rng = Application.InputBox("选择要合并的多列区域", Type:=8)
Set destCell = Application.InputBox("选择目标起始单元格", Type:=8)
For Each cell In rng
If Not IsEmpty(cell) Then
destCell.Value = cell.Value
Set destCell = destCell.Offset(1, 0)
End If
Next cell
End Sub
3、运行宏后，依次选择源数据区域和目标位置，程序会自动将所有非空值写入连续的一列中。
四、复制粘贴结合转置功能
对于少量数据，手动操作也是一种简单直接的方式，利用复制与选择性粘贴中的转置功能配合完成。
1、分别选中每一列数据，使用Ctrl+C复制。
2、在目标列的下一个空单元格处，右键选择“选择性粘贴”→“转置”，将整列数据变为一行并粘贴。
3、重复上述步骤，将所有列依次粘贴至同一列中，注意每次粘贴应在前一次数据末尾的下一行开始。
