☰

循环遍历列中的单元格并连接

tag-icon • tag-icon microsoft-excel vba macros
循环遍历列中的单元格并连接

我想要获取 A 列中的所有单元格：

*布拉*

*一些词*

*两个词*

*两个单词*

*也就是说*

循环遍历它们并连接如下：

“我的自定义文本” + “（”+“*[index1]*”，“* [index1] *”，“*[index2]*”，“* [index2] *”，“*[index3]*”，“* [index3] *” + “）”

（并且有一个按钮，单击（）后，将结果粘贴到某个单元格中，比如 B1）

（每个 [索引] 都重复，因为第一个没有空格，第二个在 ** 之间有空格）。

我使用 HTML 文档中的 Javascript 轻松完成了此操作，但我对 VBA 或 Excel 宏一无所知。

任何帮助都将受到赞赏。

答案1

尝试类似：

Sub generateString()

Range("A1").End(xlDown).Select
For i = 1 To ActiveCell.Row
    Range("A" & i).Select
    strString = strString & " " & Selection
Next i

MsgBox strString

子目录结束

相关内容