Yikes! I hate to say this, but
YOU ARE RIGHT!
I shall seek solace in proving you right in fewer lines of code!Code:Option Explicit Private Sub Form_Activate() On Error GoTo MyError Err.Raise 5 Exit Sub MyError: MsgBox Err.Description Err.Raise 13 End Sub
.





Reply With Quote