Rolling over the visible rows of a filtered table

[Xnatal]

Hi, i'm searching for a code to go through a table and register only the visible rows of a filtered table. But all I get is it to register the first visible row of every block of rows:

For i = 2 To 2000  

With Worksheets("sheet1").AutoFilter.Range.SpecialCells(xlCellTypeVisible).Areas(i)(1, 6).Select
 End With
...
next

It only registers the rows that are alterned in the filtered table, like of each block of filtered rows only takes the fist row and jumps to the next block, ignoring the rest of the visible rows of the previous. Hard to explain. Could somebody help?

Thanks.
(Honoured to participate in this olimpus of excel anyway

 

[RahulM]

Hi Xnatal,

Based on your example above, can you tell us whether you want to select first visible cell?

 

[Xnatal]

Hi RahuIM, I don't want only the first visible cell, but I want to go through all the visible cells, on by one, to register them in a list variable. How do I go to the second, third.. visible cell? The code I provide, which I gatherded form other threads, only jumps to the first one, there is the problem. I've tried also tried with offset, but no way.

Thanks!