ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   The On Error Error (https://www.excelbanter.com/excel-programming/319306-error-error.html)

Nick Shinkins[_2_]

The On Error Error
 
OK

I have code similar to the following:

Sub Number1()

For K = 1 to 40

Do this

On Error GoTo SkipTable

What would have happened if there had been no error

SkipTable:

Next K

Number2

End Sub

Sub Number2()

For L = 1 to 40

Do this

On Error GoTo SkipChart

What would have happened had there been no error

SkipChart

Next L

End Sub

--------------

This works fine til it reaches the second sub (which is near identical to
the first) and then any errors refuse to be trapped and inconveniently cause
the code to halt.

Any ideas? I'm lost.

TIA!

Nick Shinkins

Otto Moehrbach[_6_]

The On Error Error
 
Nick
You told Excel to go to SkipTable when any error is encountered. It
will do that every time thereafter unless you tell it to go back to normal.
You do that with something like:
On Error GoTo 0
Put this line after the line where the error is expected to occur. This
line tells Excel to revert to normal error behavior. HTH Otto
"Nick Shinkins" wrote in message
...
OK

I have code similar to the following:

Sub Number1()

For K = 1 to 40

Do this

On Error GoTo SkipTable

What would have happened if there had been no error

SkipTable:

Next K

Number2

End Sub

Sub Number2()

For L = 1 to 40

Do this

On Error GoTo SkipChart

What would have happened had there been no error

SkipChart

Next L

End Sub

--------------

This works fine til it reaches the second sub (which is near identical to
the first) and then any errors refuse to be trapped and inconveniently
cause
the code to halt.

Any ideas? I'm lost.

TIA!

Nick Shinkins




Dave Peterson[_5_]

The On Error Error
 
You had an alternate suggestion at your first post.

Nick Shinkins wrote:

OK

I have code similar to the following:

Sub Number1()

For K = 1 to 40

Do this

On Error GoTo SkipTable

What would have happened if there had been no error

SkipTable:

Next K

Number2

End Sub

Sub Number2()

For L = 1 to 40

Do this

On Error GoTo SkipChart

What would have happened had there been no error

SkipChart

Next L

End Sub

--------------

This works fine til it reaches the second sub (which is near identical to
the first) and then any errors refuse to be trapped and inconveniently cause
the code to halt.

Any ideas? I'm lost.

TIA!

Nick Shinkins


--

Dave Peterson


All times are GMT +1. The time now is 10:19 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com