ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Another Error Handling Question (https://www.excelbanter.com/excel-programming/436681-another-error-handling-question.html)

brichard429

Another Error Handling Question
 
I have a sub routine that may generate an error if a value is not defined.
While developing the code I've come accross the error and get an error
statement. I have to reset the code by selecting the reset button in the VBA
window to get it to work again. It's not a code issue but a data issue. I'm
not looking for a way to correct the data but I would like to use an error
handler to simply display a message and return the control back to the
spreadsheet so that the routine can run again without having to go to the
Debug window and resetting the code. Any suggestion?

Thank You,
--
Bernie

Patrick Molloy

Another Error Handling Question
 
what do you mean by "not defined"? you can check issues and trap them in
your code. The fact that you get the debug window suggests that all you need
is to add a few
ON ERROR GOTO errorline
traps




"brichard429" wrote in message
...
I have a sub routine that may generate an error if a value is not defined.
While developing the code I've come accross the error and get an error
statement. I have to reset the code by selecting the reset button in the
VBA
window to get it to work again. It's not a code issue but a data issue.
I'm
not looking for a way to correct the data but I would like to use an error
handler to simply display a message and return the control back to the
spreadsheet so that the routine can run again without having to go to the
Debug window and resetting the code. Any suggestion?

Thank You,
--
Bernie



JLGWhiz[_2_]

Another Error Handling Question
 
Put this line at the beginning of the problem code segment:

On Error GoTo ErrHandler:

Then put this code near the end of the macro.

ErrHandler:
MsgBox "Error Number " & Err.Number & " Has Occurred. Restart Macro"
Err.Clear

This gives you the error number which you can evaluate before restarting.



"brichard429" wrote in message
...
I have a sub routine that may generate an error if a value is not defined.
While developing the code I've come accross the error and get an error
statement. I have to reset the code by selecting the reset button in the
VBA
window to get it to work again. It's not a code issue but a data issue.
I'm
not looking for a way to correct the data but I would like to use an error
handler to simply display a message and return the control back to the
spreadsheet so that the routine can run again without having to go to the
Debug window and resetting the code. Any suggestion?

Thank You,
--
Bernie




brichard429

Another Error Handling Question
 
Thank You, This is what I was looking for.
--
Bernie


"JLGWhiz" wrote:

Put this line at the beginning of the problem code segment:

On Error GoTo ErrHandler:

Then put this code near the end of the macro.

ErrHandler:
MsgBox "Error Number " & Err.Number & " Has Occurred. Restart Macro"
Err.Clear

This gives you the error number which you can evaluate before restarting.



"brichard429" wrote in message
...
I have a sub routine that may generate an error if a value is not defined.
While developing the code I've come accross the error and get an error
statement. I have to reset the code by selecting the reset button in the
VBA
window to get it to work again. It's not a code issue but a data issue.
I'm
not looking for a way to correct the data but I would like to use an error
handler to simply display a message and return the control back to the
spreadsheet so that the routine can run again without having to go to the
Debug window and resetting the code. Any suggestion?

Thank You,
--
Bernie



.


brichard429

Another Error Handling Question
 
Thank you Patrick for the reply. The error is a result of a "find" procedure
that has no results and therefore gives the "not defined" value. I wasn't
sure how to handle the particular error so I wanted to use the error check to
provide a message to the user and continue execution.
--
Bernie


"Patrick Molloy" wrote:

what do you mean by "not defined"? you can check issues and trap them in
your code. The fact that you get the debug window suggests that all you need
is to add a few
ON ERROR GOTO errorline
traps




"brichard429" wrote in message
...
I have a sub routine that may generate an error if a value is not defined.
While developing the code I've come accross the error and get an error
statement. I have to reset the code by selecting the reset button in the
VBA
window to get it to work again. It's not a code issue but a data issue.
I'm
not looking for a way to correct the data but I would like to use an error
handler to simply display a message and return the control back to the
spreadsheet so that the routine can run again without having to go to the
Debug window and resetting the code. Any suggestion?

Thank You,
--
Bernie




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

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