Recognising cell values

[Mikeymay]

I am using the following the line of code in a macro

Do Until Activecell = ""

I then use the Offset command to move down cells in the
spreadsheet. Some of these cells have data hard coded
into them and others have a link to another worksheet
within the spreadsheet. If the linked cell has no value,
ie completely blank, then the cells I am checking have
a 'blank' value. when the above code gets the the linked
cell it assigns a value of '0' (zero) and doesn't
recognise is as "". I can't use

Do Until Activecell = 0

as some of the hard coded cell have a value of '00000'
which again is recognised as '0' (zero).

I have tried various combinations to try and resolve but
am not having any joy, can anyone help with what should be
a very simple problem.

 

[Sean]

Would it work if you used :-

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


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

 

[MIKEYMAY]

No, as some of the cell have '00000' hard coded into them
which is recognised as '0'

 

[BrianB]

Use something like this choosing a suitable column :-


Code
-------------------

lastrow = ActiveSheet.Range("A65536").End(xlUp).Row
For rw = 1 To lastrow
'-etc
Next

 

[Tom Ogilvy]

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).

 

[Dave Peterson]

See one more suggestion at your other thread.

I am using the following the line of code in a macro

Do Until Activecell = ""

I then use the Offset command to move down cells in the
spreadsheet. Some of these cells have data hard coded
into them and others have a link to another worksheet
within the spreadsheet. If the linked cell has no value,
ie completely blank, then the cells I am checking have
a 'blank' value. when the above code gets the the linked
cell it assigns a value of '0' (zero) and doesn't
recognise is as "". I can't use

Do Until Activecell = 0

as some of the hard coded cell have a value of '00000'
which again is recognised as '0' (zero).

I have tried various combinations to try and resolve but
am not having any joy, can anyone help with what should be
a very simple problem.