Excel技巧：如何将多列数据合并为一列？

为什么需要将Excel多列合并为一列？

在日常工作中，我们经常遇到表格数据分散在多列但需要整合到一列的情况。例如，从系统导出的数据可能将同一类型的项目拆分为多列（如姓名、电话、地址分别在不同列），但为了方便后续处理（如邮件合并、数据库导入），需要将它们合并到一列中。下面介绍几种高效的方法。

方法一：使用INDEX、MOD、ROW函数组合（适用于Excel 2007+）

假设数据在A1:C10区域（3列10行），要合并到E列。在E1输入公式：
=INDEX($A$1:$C$10, MOD(ROW(A1)-1, 10)+1, INT((ROW(A1)-1)/10)+1)
然后向下拖动填充。原理：利用ROW和MOD控制行号循环，INT控制列号递增。注意：此方法需要手动调整数据区域大小。

方法二：使用转置粘贴（适合少量数据）

复制多列数据，右键点击目标单元格，选择“转置”粘贴。得到的是多行多列，再通过“替换”或公式将换行符处理成一列。或者先复制，在记事本中粘贴，再复制回Excel一列。

方法三：Power Query（Excel 2016+或安装插件）

选中数据区域，点击“数据”选项卡 -> “从表格/区域”进入Power Query编辑器。选中所有列，右键选择“逆透视列”或“逆透视其他列”。然后关闭并加载到工作表。这是最快捷的方法，无需公式。

方法四：VBA宏（适合批量操作）

按Alt+F11打开VBA编辑器，插入模块，输入以下代码：
Sub MergeColumns()
Dim rng As Range, arr, i As Long, j As Long, k As Long
Set rng = Selection
arr = rng.Value
ReDim out(1 To rng.Rows.Count * rng.Columns.Count, 1 To 1)
For i = 1 To UBound(arr, 2)
For j = 1 To UBound(arr, 1)
k = k + 1: out(k, 1) = arr(j, i)
Next j, i
Range(Cells(1, rng.Column + rng.Columns.Count + 1), Cells(k, rng.Column + rng.Columns.Count + 1)).Value = out
End Sub
选中数据区域，运行宏即可。注意保存为启用宏的工作簿。

方法五：使用第三方插件（如方方格子、E灵）

这些插件通常提供“合并列”功能，一键操作，适合不熟悉公式的用户。

注意事项

• 合并前备份数据，避免误操作。
• 如果含有空单元格，合并后可能产生空行，可后续筛选删除。
• 公式方法会生成动态结果，修改原数据后会自动更新；而Power Query需要刷新。

根据你的Excel版本和操作习惯选择最适合的方法。掌握这些技巧，能大幅提高数据整理效率。