Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Preventing Form Dialog dismiss (Red X)
I want to detect if someone click the Red X to dismiss the form instead of my
OK or Cancel command buttons. Even better would be to prevent the form from being dismissed in the first place. I looked in the Object Browser for UserForm and did not find a BeforeUnload event. I see the Terminate event, but it appears this is too late to prevent the form from being terminated. Is there something I'm missing? inTHANKSadvance |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Preventing Form Dialog dismiss (Red X)
Jim,
You can use the userform QueryClose event to prevent the form from closing. Something like... Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode < 1 Then Cancel = True MsgBox "Please use the cancel button to exit. " End Sub Regards, Jim Cone San Francisco, USA "Jim Zeeb" wrote in message ... I want to detect if someone click the Red X to dismiss the form instead of my OK or Cancel command buttons. Even better would be to prevent the form from being dismissed in the first place. I looked in the Object Browser for UserForm and did not find a BeforeUnload event. I see the Terminate event, but it appears this is too late to prevent the form from being terminated. Is there something I'm missing? inTHANKSadvance |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Preventing Form Dialog dismiss (Red X)
This might be even more useful...
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode < 1 Then Cancel = True MsgBox "Please use the cancel button to exit. " End If End Sub Jim Cone |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Preventing Form Dialog dismiss (Red X)
Thanks Jim,
That was just what I was looking for. :) "Jim Cone" wrote: This might be even more useful... Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode < 1 Then Cancel = True MsgBox "Please use the cancel button to exit. " End If End Sub Jim Cone |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
dismiss blanks in lookup | Excel Worksheet Functions | |||
Dialog & User Form | New Users to Excel | |||
How to resize Data Form dialog window? | Excel Worksheet Functions | |||
Dialog Box/Form Help! | Excel Programming | |||
Trapping and preventing a form from being e-mailed before validation | Excel Programming |