Populating a Subset using Array

[SBF12345]

Greetings,

I would like to produce a subset of rows in a population using a loop. Is it possible to add elements to an array variable within a loop structure? Perhaps something like the code below...

j = Cells(Rows.Count, "A").End.xlUp.Row

For I = j To 2 Step -1


If Cells(I, "A") > 1000 Then


'Add to an array variable Else


Next I

Thanks!

 

[SBF12345]

I decided to go with the use of a New Collection variable instead of an array. I added a watch and observed the collection populate and it works. Problem solved. The new chunk is posted below:

Dim j As IntegerDim col As New Collection


j = Cells(Rows.Count, "A").End(xlUp).Row


For I = j To 2 Step -1


If Cells(I, "B") > 1000 Then


col.Add Cells(I, "B").Row


End If


Next I


'
End Sub