VBA: Help on Ignoring error values / Err.number

[vidyuthrajesh]

Hello,

Primarily i would like asssitance on how to trap "divisible by zero" error and continue the code execution. if this error occurs the value of the variable should be zero or else the actual value ( for instance if it is 1/0 the value of variable should be 0 and if it is 2/4 the value of variable should be 2). Also, would like to know, can err.number be (re)intialized to zero?

the below code ( unsure why) give me the following result : when run for the first time it gives me 0 and from 2nd time it gives me the value of 1. This happenns whether i use "On error REsume next" or NOT ( the result is same)

err 9 : Subscript out of range and Err 11 is Division by Zero. why am i getting "subscript out of range" error - i fail to understand. can someone help me out on this?

Thanks

Please Login or Register  to view this content.

[JosephP]

you shouldn't ever get an error with that and x should always be 0.

[vidyuthrajesh]

That was my understanding also..but this code gives me value 1 ( which is in If condition of Err.number=9 !!)

[JosephP]

what does the first message say?
that could should not ever give you 1 as an output and I can't see how it would, unless your last error was 9 in some code that is calling this routine.

[vidyuthrajesh]

msgbox err.number gives me Zero !!

[JosephP]

where is the 1 appearing? If you're not getting an error message, then no error is occurring. as I said I can't see how you'd get 1 - I certainly don't.

[vidyuthrajesh]

have you tried testing the code?

[JosephP]

Yes - that's what "I certainly don't" means.

[vidyuthrajesh]

..if you are not getting erro message....r u getting the "expected" result? ( what is the value of X's you are getting?

[JosephP]

I am getting 0 in all 10 cells as expected.