excel如何将多列合并为一列？

先看原始数据。列A到E是单元格数据。需要将每行的非空单元格内容合并到F列中，并存储在一个单元格中，用逗号分隔。

选择[开发工具]-[插入]-选择[ActiveX控件]中的按钮。

用鼠标在excel表格中画一个按钮。

双击此按钮进入编辑代码模式。

粘贴以下代码：

私有子命令按钮1 _单击()

Dim n，I，j，m

Dim arr，brr()

n=[a65535]。结束(xlUp)。排

ReDim brr(1至n)

Arrer=范围(' A1:e' n ')，其中A1:EN代表原始数据区。

对于i=1至n

对于j=1到5 '5意味着列A到E是5列。

如果arr(i，j)' '那么

brr(i)=brr(i)'，' arr(i，j)

如果…就会结束

下一个j

brr(i)=Mid(brr(i)，2，99)

接下来我

[F1]。调整大小(n，1)=应用程序。invert (brr)' f1表示输出结果从f1开始。

末端接头

返回excel工作表界面，点击【开发工具】-【编辑模式】，退出编辑模式。

点击刚刚插入的命令按钮，F列将输出我们想要的内容。

注意：

您只需要更改代码中标记的原始区域的列标记和行号以及输出结果位置的第一个单元格，就可以应用到读者自己的实际工作表中。