ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Throwing an error ... on purpose! (https://www.excelbanter.com/excel-programming/332324-throwing-error-purpose.html)

Sarah B via OfficeKB.com[_2_]

Throwing an error ... on purpose!
 
Background:
I have been learning to use error handling when coding macros - mostly just
using On Error GoTo statements. I have a subroutine that is called from an
OnError GoTo block. If a certain condition is met (no files were found that
fit my criteria), I want my subroutine to throw an error and return to the
function that called it. This is not a situation that will normally throw an
error, but I need to handle it as if it were an error.

Question:
How do I throw an error? (short of simply putting in a non-valid statement
that I know will cause a real error)

--
Message posted via http://www.officekb.com

Jim Thomlinson[_4_]

Throwing an error ... on purpose!
 
Just add the line

Error 1

Which raises the application defined or object defined error. For different
errors just use the appropriate error number/code.
--
HTH...

Jim Thomlinson


"Sarah B via OfficeKB.com" wrote:

Background:
I have been learning to use error handling when coding macros - mostly just
using On Error GoTo statements. I have a subroutine that is called from an
OnError GoTo block. If a certain condition is met (no files were found that
fit my criteria), I want my subroutine to throw an error and return to the
function that called it. This is not a situation that will normally throw an
error, but I need to handle it as if it were an error.

Question:
How do I throw an error? (short of simply putting in a non-valid statement
that I know will cause a real error)

--
Message posted via http://www.officekb.com


Sarah B via OfficeKB.com

Throwing an error ... on purpose!
 
Thanks! I've had to rearrange my code and now I don't need to purposely throw
an error. But I will keep this command handy just in case.

--
Message posted via http://www.officekb.com


All times are GMT +1. The time now is 10:09 PM.

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