vb Code:
  1. On Error GoTo ErrHandler

  2.  
  3. 'your code here

  4.  
  5. Exit Sub 'This keeps it from running the error handler every time

  6.  
  7. ErrHandler:  'The name you gave it after the "GoTo" part

  8.  
  9. msgbox Err.Number & vbcrlf & Err.Description