I set a range to the whole section, apply filters, then reset the range to
the visible cells. This now gives you the freedom to move to (row, column)
within just the filtered range. Something like:
Dim rng As Range
Set rng = Selection 'replace Selection with your range parameters
' Insert filtering here
Set rng = Intersect(rng, rng.SpecialCells(xlCellTypeVisible))
rng.Copy

HTH
Ed

"Alvaro Silva" wrote in message
...
I got a problem, I get a filtered selection in a worksheet, next move is
to
move the pointer in a filtered selection down until it is found a certain
cell empty. That cell is seven columns at right from the active cell
selection.

The filtered seklection has some noncontiguos registers in the DB that is
being modified.

I need to do this in a cycle until it is finished the revision of a
certain
list of lots in another DB.

Alvaro Silva