I have developed a grid [quite large] with formulas to extract data by
date.
I would now like to delete all cells that have a value of zero. I know
that I
can take on this task manually, but prefer to find a macro that might
work.

Is there a Macro that can run up and down a column and identify the
value of
the cell and if it equals zero, issue a command to clear the content of
that cell?

All responses will be deeply apprieciated!!!!

Thanks,

Bob


--
VETcalc
------------------------------------------------------------------------
VETcalc's Profile: http://www.excelforum.com/member.php...o&userid=13078
View this thread: http://www.excelforum.com/showthread...hreadid=513920

Sub zero()
Range("A1:D10").Select
For Each cell In Selection
If cell.Value = 0 Then
cell.Clear
End If
Next cell
End Sub

the range to be altered to suit.........

Mind, this will delete any formula's with the result of zero as well.


Greetings from New Zealand
Bill K


"VETcalc" wrote in
message ...

I have developed a grid [quite large] with formulas to extract data by
date.
I would now like to delete all cells that have a value of zero. I know
that I
can take on this task manually, but prefer to find a macro that might
work.

Is there a Macro that can run up and down a column and identify the
value of
the cell and if it equals zero, issue a command to clear the content of
that cell?

All responses will be deeply apprieciated!!!!

Thanks,

Bob


--
VETcalc
------------------------------------------------------------------------
VETcalc's Profile:
http://www.excelforum.com/member.php...o&userid=13078
View this thread: http://www.excelforum.com/showthread...hreadid=513920

Bill,

Thank you!!!!!!!!!

Bob


--
VETcalc
------------------------------------------------------------------------
VETcalc's Profile: http://www.excelforum.com/member.php...o&userid=13078
View this thread: http://www.excelforum.com/showthread...hreadid=513920