如何在VBA Excel中将范围分配给string

我有一个表中的date列在Excel中的事务。 我有一个名为事务的列,我想迭代通过描述并将它们分配给一个string。 我的testing代码如下,我得到一个错误1004。

For i = 1 To Range("Transactions").Rows.Count ' Set group to the value returned from the DEscription Table strGroup = Range("Transactions[Description]")(i) Next i 

我需要帮助,我尝试添加.Value在最后,并没有任何帮助

我想基本上search特定的字段中的每个单元格,如果它们匹配。 将文本复制到新列。 所以这就是为什么我想把每个描述都当作一个string,然后用它作为InStr函数中的一个参数

也许join(application.transpose(range("a1:a100").value)," ")不知道它将如何执行各种大小,但100行是好的。

在这里输入图像说明