如何用VBA在excel中创建特殊格式字符串列表

我在excel中有一列，其值如下：

Column_Name
row1
row2
row3

我需要用VBA用这种格式创建一个字符串变量

('row1','row2','row3')

我有这个密码

   Dim Strg As String
   With Range(Range("E2"), Range("E2").End(xlDown))
      Strg = Replace(Application.Trim(Join(Application.Transpose(.Value), " ")), " ", ",")
   End With

但是它只给了我

row1，row2，row3

我不知道如何把它放在“”之间，并在开头和结尾加上括号。

---

你知道吗？

这就是你要尝试的吗

Dim Strg As String
With Range(Range("E2"), Range("E2").End(xlDown))
    Strg = Replace(Application.Trim(Join(Application.Transpose(.Value), " ")), " ", "','")
End With

Debug.Print "('" & Strg & "')"

---

不，这给我（'row1，row2，row3'），我需要（'row1'，'row2'，'row3'）。'必须在每行之间，而不仅仅是begginig和End。您确定在粘贴代码时复制了代码吗？我想你错过了

“，”

部分：D