Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cancel button to bypass MsgBox
hi VB addicts!!
hope all bugs are conquered... i created a userform in Excel. I validated a textbox when empty to trigger MsgBox. However, when I wish to cancel userform...MsgBox displays not allowing to cancel. What can I do bypass MsgBox when cancelling userform entirely?? My code: 'textbox FAST Private Sub txtfast_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'display msgbox if textbox fast is empty If txtfast.Text = "" Then MsgBox "Enter FAST File" Cancel = True End If End Sub 'Cancel Button Private Sub cmdcancel_Click() 'cancel userform1 Unload UserForm1 End Sub thanks in advance & have a happy day!! myrna *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cancel button to bypass MsgBox
Mhm... why don't you validate the txtfast in the "OK" button instead ?
-- Regards Juan Pablo González "Myrna Rodriguez" wrote in message ... hi VB addicts!! hope all bugs are conquered... i created a userform in Excel. I validated a textbox when empty to trigger MsgBox. However, when I wish to cancel userform...MsgBox displays not allowing to cancel. What can I do bypass MsgBox when cancelling userform entirely?? My code: 'textbox FAST Private Sub txtfast_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'display msgbox if textbox fast is empty If txtfast.Text = "" Then MsgBox "Enter FAST File" Cancel = True End If End Sub 'Cancel Button Private Sub cmdcancel_Click() 'cancel userform1 Unload UserForm1 End Sub thanks in advance & have a happy day!! myrna *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cancel button to bypass MsgBox
Myrna,
Use a module scope variable, and set it to a value in the cancel procedure, then test that in the exit routine. Something like Dim fCancel As Boolean Private Sub txtfast_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'display msgbox if textbox fast is empty If Not fCancel Then If txtfast.Text = "" Then MsgBox "Enter FAST File" Cancel = True End If End If End Sub 'Cancel Button Private Sub cmdcancel_Click() 'cancel userform1 fCancel = True Unload UserForm1 End Sub -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "Myrna Rodriguez" wrote in message ... hi VB addicts!! hope all bugs are conquered... i created a userform in Excel. I validated a textbox when empty to trigger MsgBox. However, when I wish to cancel userform...MsgBox displays not allowing to cancel. What can I do bypass MsgBox when cancelling userform entirely?? My code: 'textbox FAST Private Sub txtfast_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'display msgbox if textbox fast is empty If txtfast.Text = "" Then MsgBox "Enter FAST File" Cancel = True End If End Sub 'Cancel Button Private Sub cmdcancel_Click() 'cancel userform1 Unload UserForm1 End Sub thanks in advance & have a happy day!! myrna *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cancel button to bypass MsgBox
I validated textboxes in command button OK.
When I Cancel, Msgbox appears and not letting me trigger Cancel event. I used the code, but no luck...thanks Mr. Bob Any other suggestion?? thanks...myrna *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
msgbox cancel? | Excel Discussion (Misc queries) | |||
Inputbox or msgbox critical + Cancel | Excel Programming | |||
Cancel Button | Excel Programming | |||
Cancel buttons in Msgbox | Excel Programming | |||
Button To Cancel Macro | Excel Programming |