Clear Contents Of Cell If Value = 0 or Error
 

I posted last week on this problem I am trying to solve.


Sub stantiate()
Dim myRange As Range
Set myRange = Range("C10:d1000")
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next
End Sub

The code gets hung up at:

If c.Value = 0 Then

the cell value could be #N/A or some other
"errors".

Could this be the reason the code gets hung up ?

If so, is there a way to resolve the problem ?

Thank you in advance.

Clear Contents Of Cell If Value = 0 or Error
 

If I'm understanding you correctly...if the cell value is actually a cell
error, you would like the cell value=0?

"carl" wrote:

I posted last week on this problem I am trying to solve.


Sub stantiate()
Dim myRange As Range
Set myRange = Range("C10:d1000")
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next
End Sub

The code gets hung up at:

If c.Value = 0 Then

the cell value could be #N/A or some other
"errors".

Could this be the reason the code gets hung up ?

If so, is there a way to resolve the problem ?

Thank you in advance.

Clear Contents Of Cell If Value = 0 or Error
 

you haven't declared c..........

dim c as Range

blah blah
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next

also, "Next" needs to be "Next c"
you might also need to change
c.Value = ""
to
c.clearcontents

hope this helps!
susan


On Jul 9, 10:56 am, carl wrote:
I posted last week on this problem I am trying to solve.

Sub stantiate()
Dim myRange As Range
Set myRange = Range("C10:d1000")
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next
End Sub

The code gets hung up at:

If c.Value = 0 Then

the cell value could be #N/A or some other
"errors".

Could this be the reason the code gets hung up ?

If so, is there a way to resolve the problem ?

Thank you in advance.

Clear Contents Of Cell If Value = 0 or Error
 

Thanks for your help.

I need the contents of the cell cleared only if the value = 0.

That said, when I run the macro, some of the cells are #N\A and other error
messages.

I would like the macro to ignore the error messages.

"E-Coder" wrote:

If I'm understanding you correctly...if the cell value is actually a cell
error, you would like the cell value=0?

"carl" wrote:

I posted last week on this problem I am trying to solve.


Sub stantiate()
Dim myRange As Range
Set myRange = Range("C10:d1000")
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next
End Sub

The code gets hung up at:

If c.Value = 0 Then

the cell value could be #N/A or some other
"errors".

Could this be the reason the code gets hung up ?

If so, is there a way to resolve the problem ?

Thank you in advance.

Clear Contents Of Cell If Value = 0 or Error
 

Does this code do what you want?

Dim C As Range
Dim myRange As Range
Set myRange = Range("C10:d12")
For Each C In myRange
If Not IsError(C.Value) Then
If C.Value = 0 Then C.cl
End If
Next

Rick


"carl" wrote in message
...
Thanks for your help.

I need the contents of the cell cleared only if the value = 0.

That said, when I run the macro, some of the cells are #N\A and other
error
messages.

I would like the macro to ignore the error messages.

"E-Coder" wrote:

If I'm understanding you correctly...if the cell value is actually a cell
error, you would like the cell value=0?

"carl" wrote:

I posted last week on this problem I am trying to solve.


Sub stantiate()
Dim myRange As Range
Set myRange = Range("C10:d1000")
For Each c In myRange
If c.Value = 0 Then
c.Value = ""
End If
Next
End Sub

The code gets hung up at:

If c.Value = 0 Then

the cell value could be #N/A or some other
"errors".

Could this be the reason the code gets hung up ?

If so, is there a way to resolve the problem ?

Thank you in advance.