You can easily accomplish this without using a macro... in the column or rows
where you recieve the #VALUE error try using an If(Iserror) statement. So if
you have a formula like

=A1/B1

If B1 is 0 you will get an error... but to fight that you would put

=If(Iserror(A1/B1),"No Info",A1/B1)

So basically you are just wrapping your current formula in the Iserror(). So
if an error pops up it will write in "No Info"

"orquidea" wrote:

Hi All

Could anyone please help me to write a subprocedure wich replace the cell
with the error note #VALUE! with the comment "No Info"
I have the below

If ActiveCell.Value = numero (I don' know how to tell the computer
that any number is valid) Then
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Value = "No Info"
End If

Thanks,
Orquidea