Disable X (Close) in form

[N Prakash]

Hi! Friends,

I have a form where in I want to disable the X (Close). I have used following code in my macro

Application.CommandBars("File").Controls("Close").Enabled = False

It is not working. Can anybody help me please

Prakash

 

[al_b_cnu]

hi,
This link includes the code to do this:

http://j-walk.com/ss/excel/faqs/xl97faq6.htm

 

[N Prakash]

Hi

I got the code

Private Sub UserForm_QueryClose _
(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
MsgBox "You can't close the form like that."
Cancel = True
End If
End Sub

Where to put this code, whether in the form or in the module.

Regards,
Prakash

 

[al_b_cnu]

Hi,


Place it in the Userform.

 

[Richie(UK)]

Hi

I got the code

Private Sub UserForm_QueryClose _
(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
MsgBox "You can't close the form like that."
Cancel = True
End If
End Sub

Where to put this code, whether in the form or in the module.

Regards,
Prakash

?The paragraph immediately above the code that you refer to explains where to place the code!

... using a UserForm_QueryClose event procedure in the code module for the UserForm.

 

[N Prakash]

Hi

I tried putting in the module sheet and also in the form. But it is not working. I do not know what mistake I am doing.


Prakash

 

[al_b_cnu]

Hi Prakash,

If you double-click the userform, VBA editor will take you top the code window. If you then select 'Query Close' from the drop-down list to the top right of the code window, it will automatically insert the start & end of the sub as follows:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

End Sub
Paste your code into there (but exclude the 'Private Sub...' and 'End Sub' lines of course.
It might be a good idea to remove the code from anywhere else you may have put it.

 

[N Prakash]

Hi! Alan,

I tried the procedure as you have explained. No doubt it dispalys the message box, but it will not disable the X button of my form. If I close the message box, then I can close the form by clicking on the X button. I have seen some of the message boxes and dialogue boxes where in the X button is disabled.

Regards,
Prakash

 

[N Prakash]

Hi Alan,

Sorry it is working fine. Thanks for all the help.