hi.
dim c as range 'current
dim n as range 'next
set c = range("A1")
do while not isempty(c)
set n = c.offset(1,0)
your code here
set c=n
loop

regards
FSt1
"Hru48" wrote:


Hey,

I have a macro that at the end of each irrteration deletes a cell from
colum A. How do i tell it to run until it runs of of values in column
A? Column A is empty

Cheers


--
Hru48
------------------------------------------------------------------------
Hru48's Profile: http://www.excelforum.com/member.php...o&userid=24895
View this thread: http://www.excelforum.com/showthread...hreadid=397701