EXCEL 自定义函数把一列字符型数转为字符串

2025-02-25 07:44:13

推荐回答（2个）

回答1：

可以用如下自定义函数：

Public Function mystr(ll, ParamArray x())
    Dim r, rr
    For Each r In x
        If IsArray(r) Then
            For Each rr In r
            If rr <> "" Then mystr = mystr & ll & rr
            Next rr
        Else
            mystr = mystr & ll & r
        End If
    Next r
    mystr = Mid$(mystr, 2, Len(mystr))
End Function

第一参数：连接符

第二参数：需要连接的单元格区域。

第三、四……参数：可省略，如不省略，功能同第二参数。

如上例可写公式为：=mystr(",",A1:A4)

回答2：

下班后再来看看……