ExcelVBA开发：函数编写-用某个字符将各个单元格内的字符串联接

在Excel的内置函数里有个函数concatenate，是将两个或多个文本字符串联接为一个字符串，

但这个字符串联接函数是直接将各个字符串进行联接，各个被联接的字符串并没有用联接字符进行隔开，如果后续需要再次分开使用这些字符串，可能就不方便了(如上图所示）当然这个问题也有变通方式，比如在每个单元格内的字符串的后面加上联接符号，或这用&这个符号来连接连接符和各个字符串，如下图所示：

另外，还有个问题，如果需要联接的字符串比较多，我们希望采用将单元格区域内的字符串联接，而不是每个单元格每个单元格的选择然后联接，但concatenate函数不能基于单元格区内的字符串的联接，

基于单元格区域的字符串联接，concatenate会有错误当然，以上所提到的问题可能可以通过其他方式来变通解决，即使通过内置函数的嵌套来解决也不一定更方便。因此，我们希望自己编写一个可以满足上面要求的函数。

而带参数的sub过程不会显示显示在宏对话框，也不会显示在函数列表，因此，对于带参数的sub过程或者通过不带参数的子过程调用窗体后，再通过窗体上的按钮调用。而function过程则可以显示在excel插入函数对话框并调用，或者也可以直接在单元格显示并进行调用，相比sub过程方便许多。

但function也有自己的局限性，比如前文所所述的批量复制工作表，用function在单元格里面调用就行不通，当然通过其他方式调用也是可以，但便利程度就与sub没有太大差别了。接下来编写前面说的字符串联接函数。

效果如下：