ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   The userform X button (https://www.excelbanter.com/excel-programming/300282-userform-x-button.html)

Esben[_6_]

The userform X button
 
Hi

Is it possible to disable the close button (the "X") on a userform? And
how?


---
Message posted from http://www.ExcelForum.com/


Jim Rech

The userform X button
 
In the userform's UserForm_QueryClose event set Cancel to 1:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then Cancel = 1 ''0 = "x" clicked. 1 = Unload Me
End Sub

Private Sub CommandButton1_Click()
Unload Me
End Sub


--
Jim Rech
Excel MVP
"Esben " wrote in message
...
| Hi
|
| Is it possible to disable the close button (the "X") on a userform? And
| how?
|
|
| ---
| Message posted from http://www.ExcelForum.com/
|



memark

The userform X button
 
have a look in the object browser for vbQueryClos

theses are the values for closemode in
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer

Const vbFormControlMenu = 0 ' this is if u close the form by clicking the "X" butto
Const vbFormCode = 1 ' u want to close it from somewhere in the code u have writte
Const vbAppWindows = 2 ' if windows is closing the applicatio
Const vbAppTaskManager = 3 ' u closed the application from teh task manage
Const vbFormMDIForm =




All times are GMT +1. The time now is 10:48 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com