If the cells actually appear blank then you can do

do Until ActiveCell.Text = ""

However, a cell linked to a blank cell usually displays zero.

you might use

do until ActiveCell.Hasformula and ActiveCell.Value = 0

If you have zero values suppressed with Tools=Options=View tab, then the
first method will work with linked cells (even though they have a value of
zero).



--
Regards,
Tom Ogilvy

"MIKEYMAY" wrote in message
...
No, as some of the cell have '00000' hard coded into them
which is recognised as '0'


-----Original Message-----
Would it work if you used :-

Do Until (Activecell = "") OR (Activecell.Value = 0)


Sean
"Just press the off switch, and go to sleep!"

*** Sent via Developersdex http://www.developersdex.com
***
Don't just participate in USENET...get rewarded for it!
.