excel怎么把多列内容合并到一列-Excel教程

本例主要介绍如何在excel中将多列单元格的内容合并到一列，并放在一个单元格中用逗号分开。

前期准备工作（包括相关工具或所使用的原料等）

excel

操作过程：

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

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

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

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

粘贴下列代码：

Private Sub CommandButton1_Click()

Dim n, i, j, m

Dim arr, brr()

n=[a65535].(xlUp).Row

ReDim brr(1 To n)

arr=Range("A1:E" & n) '其中A1:EN表示的是原始数据区域

For i=1 To n

For j=1 To 5 '5表示A到E列是5列

If arr(i, j) <> "" Then

brr(i)=brr(i) & "," & arr(i, j)

If

Next j

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

Next i

[F1].Resize(n, 1)=Application.Transpose(brr) 'F1表示从F1开始输出结果

Sub

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

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

注意：

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

注意事项

如果您觉得此经验有用，可以点击本页面右上方的【大拇指】图案和【收藏按钮】或者右下方的【分享】按钮，也可以点击本注意事项下方的【收藏】按钮。

如需要了解更多内容，可以百度搜索“百度经验shaowu459”或到百度知道向我提问。

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本文系本人依照真实经历原创，未经许可，谢绝转载。