Multiple On Error Statements

[MikeDBMan]

I want to put some error checking in my code but I can't seem to figure out how to have multiple "On Error Goto XXX" statements in the same Sub. Someone said to place "Resume" statements in the code but I can't figure out how to make it work. Below are 2 "On Error" statements. The line Sheets("asdf").Select should be skipped because that tab does NOT exist but instead I get an error message. What am I doing wrong? Thanks!

Sub testit()
On Error GoTo AfterSkipped
 
'blah blah blah  code and more code....
 
Resume AfterSkipped
GoTo AfterSkipped
 
AfterSkipped:
On Error GoTo NextErr
Sheets("asdf").Select
 
NextErr:
End Sub

 

[Joe4]

Take a look at the options here. Personally, I like the one where you have a separate function to check for the existence of a sheet: http://www.mrexcel.com/forum/showthread.php?t=3228