Excel将列转换为逗号分隔

Question

在Excel中，我有一列有50行。现在我想将这50行转换为逗号分隔值的单个单元格。有没有办法做到这一点？

Answer 1

试试这个用户定义函数：

Public Function conkat(rIn As Range) As String 
    conkat = "" 
    For Each r In rIn 
     conkat = conkat & "," & r.Value 
    Next r 
    conkat = Mid(conkat, 2) 
End Function 

使用，如：

= conkat（A1：A50）