怎样使用VBA字符连接？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Function Join(rng As Range, X As String) As String

    Application.Volatile
    For Each cell In rng
    Dim temp As String
    If cell <> "" Then
    temp=temp & cell & X
    End If
    Next
    Join=Left(temp, Len(temp)-Len(X))
End Function

5、如图所示之数据，需要将地址串联起来，则在单元格B1中输入公式“=Join(A1:A4,"")”，公式即将区域A1:A4中的数字以空字符串连接起来。如果需要将各字符串以“、”符号分割开，则将公式修改为“=Join(A1:A4,"、")”。公式的第一个参数表示需要串联的区域，第二个参数表示各字符串连接时的分割符，若不需要分割符，则用""空字符