如何使用自定义函数快速连接Excel表格中多单元格数据？

函数名：MYSTR

作 用：用任意连接符连接文本

参数介绍： 第一参数：(必须)指定连接符，可以是文本常量，也可以是单元格引用。忽略空单元格。

第二参数：(必须)需要连接的文本或单元格区域。

第三、四等参数：(可选)同第二参数

效果展示：

创建自定义函数的方法：

新建一个EXCEL文档，只保留一个工作表，其余删除。

按ALT+F11，打开VBE编辑器，新建一个模块，把下面的自定义函数代码复制到模块中，关闭VBE编辑器。

PublicFunction mystr(ll, ParamArray x())

For Each r In x

If IsArray(r) Then

For Each rr In r

If rr <> ""Then mystr = mystr & ll & rr

Next

Else

mystr = mystr & ll & r

End If

Next

mystr = Mid$(mystr, 2, Len(mystr))

EndFunction

按F12【另存为】，文件保存类型选择“Excel加载宏”。它将自动存入ADDIN文件夹中。

然后从任意一个EXCEL文件的【开发工具】-【加载宏】中勾选所保存的宏文件名，确定。就可以在工作表中的随心所欲的使用自定义的合并文本函数啦，赶紧的，动手试试吧——