vba - 将多行数据合并到一个单元格中，用引号和逗号分隔

Question

我有以下数据：

2
3
4
5
6
7
8
9
10
apple
green
hi

我想将所有这些合并为一个值，如下所示：

'2','4','5','6','7','8','9','10','apple','green','hi'

所以我需要从行中获取数据，将它们粘贴到 Excel 文件中，运行这个宏并将它们全部放在一个单元格中（使用逗号和引号）。然后，我会将它们放在WHERE INSQL 语句中的一个子句中，以便更快地搜索。如果有更简单的方法或工具，请告诉我。

这是 SQL 中的预期用途：

Select *
from Blah..Table
where IDs in 
(
'2','4','5','6','7','8','9','10','apple','green','hi'
)

score 3 · Accepted Answer

我编写了一个名为 JoinRange 的用户定义函数来执行此操作。您可以在此处获取代码

你会像这样使用它

=joinrange(A1:A12,,"','","'","'")

这给出了结果

'2','3','4','5','6','7','8','9','10','apple','green','hi'

您也可以从 VBA 调用它。

1 回答 1