将一个常量值附加到逗号分隔列表的所有项目中

我有两列。 我想连接ColumnA和ColumnB中的单元格,以给出ColumnD中所示的输出。 我已经尝试过ColumnA&ColumnB但是列C中显示的输出不符合所需的输出。 我该如何解决?

 Input1 |Input2 |Output |Desired output ColumnA|ColumnB |ColumnC |ColumnD ----------------------------------------- A |1,2,3,4 |A1,2,3,4 |A1, A2, A3, A4 B |5,3,6,7 |B5,3,6,7 |B5, B3, B6, B7 C |8,9 |C8,9 |C8, C9 D |10,11,45|D10,11,45|D10, D11, D45 

这个用户定义的函数适用于我:

 Function prependToAllElements(prefix As String, commaSeparatedList As String) As String Dim i As Long Dim s() As String s = Split(commaSeparatedList, ",") For i = LBound(s) To UBound(s) s(i) = prefix & s(i) Next i prependToAllElements = Join(s, ",") End Function 

单元格D1中的示例用法:

 =prependToAllElements(A1,B1) 

你可以尝试这样的事情

 =A1 & SUBSTITUTE(B1;",";", " & A1)