Thanks Leith,

This is a good idea, especially if one often have to re-access the filtered
cells.
But I hold the view that Excel should supply this information itself without
additional coding!

Regards,
Stefi

€žLeith Ross€� ezt Ã*rta:


Hello Stefi,

AS the For Each loop finds the visible cells, store the information in
an Array. You can then reference the array later to retrieve the value,
address, etc. for the cell you want.


Code:
--------------------

Dim SpCells()
Dim cell
Dim n As Long

For Each cell In filteredrng
Redim Preserve SpCells(1, n)
SpCells(0, n) = cell.Row
SpCells(1, n) = cell.Value
n = n + 1
Next cell

--------------------


Sincerely,
Leith Ross


--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...o&userid=18465
View this thread: http://www.excelforum.com/showthread...hreadid=479715