Private Sub EditHeader()

ReDoHeaderEdit:

iSelection = 0

On Error GoTo reporterror

iselection=0

iSelection = InputBox("Which line to change?")

reporterror:
If Err = 13 Then MsgBox "Please don't press CANCEL"

GoTo ReDoHeaderEdit

End Sub
=================================

This is basically what I am dealing with.  When the user first 
presses cancel, the get the message in the reporterror area.  The 
second time, there's a type mismatch on the input box line.  Why?  

Is there another way to disable or ignore the cancel button on an 
input box?  usually I have them in a do loop which ignores it fine 
but with all the discussion about loops on here lately I thought I 
would just try trapping the error.








'// =======================================================
    Rules : http://ReliableAnswers.com/List/Rules.asp
    Home  : http://groups.yahoo.com/group/vbHelp/
    =======================================================
    Post  : [email protected]
    Join  : [EMAIL PROTECTED]
    Leave : [EMAIL PROTECTED]
'// =======================================================
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/vbhelp/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Reply via email to