Excel VBA迭代范围对象数组

我正在尝试遍历范围引用的数组。

Dim labels As Collection Set labels = New Collection Dim myLabel As Range Set myLabel = FindDataRow(mySearchterms, CurrentWorksheet) ' <- Returns a Range labels.Add (myLabel) 

后来我试图遍历这些范围引用和下面的代码不起作用：我得到一个运行时错误424.我明白，一个对象是必需的，但是如何标签成为一个string。

 Dim label As Variant Set label = Nothing For Each label In labels Debug.Print (label & " in: " & label.Row) Next label 

我已经尝试过下面这个其他的答案在这里，但因为我是新的VBA在Excel中，我不明白如何在数据结构中放置范围引用，然后检索/引用访问label.Row ，我想要上面（在点它说“~~”做任何你想要做的范围在这里“）

我的理解到目前为止， labels是一个集合，并不关心其中的项目types。 所以我添加了Range引用。 但是我以后再也找不到。 我哪里错了？

Answer 1

从add方法中删除括号，因为这会强制范围的值被添加到集合而不是对象：

 labels.Add myLabel