如何将单引号和逗号添加到列中的所有值？

我有一个列host具有以下值：

 server1.abc.com server2.abc.com server3 

现在，我希望每个值都是单引号，并用逗号分隔。 输出应该如下所示：

 'server1.abc.com','server2.abc.com','server3' 

请让我知道如何使用Excel来实现这一点。

到目前为止，我能够使用下面的代码分离值：

 Public Function MergeME(r As Range) As String MergeME = Join(Application.Transpose(r.Value), ",") End Function 

我怎样才能在每个单元格中的值附加双引号？

Answer 1

你原来的UDF很接近。 你只需要join','而不是,然后把'放在'输出string的开始和结尾

 Public Function MergeME(r As Range) As String MergeME = "'" & Join(Application.Transpose(r.Value), "','") & "'" End Function 

根据需要输出string：

 'server1.abc.com','server2.abc.com','server3' 

Answer 2

使用A1到A3中的数据，在B1中input：

 ="'" 

（ 这是用双引号括起来的单引号 ）

然后在B2 ：

 =B1 & A1 & B1 & "," & B1 & A2 & B1 & "," & B1 & A3 & B1