Userform close button

G

Guest

Is there a way to disable the close button top right of a userform. I am
after the user only being able to use a commandbutton titled 'Exit'
 
G

Guest

try this

Private Sub Userform_QueryClose(Cancel As Integer, closeMode As Integer)
If closeMode = 0 Then
Cancel = True
MsgBox "Please use the button!"
End If
End Sub
 
G

Guest

try this

Private Sub Userform_QueryClose(Cancel As Integer, closeMode As Integer)
If closeMode = 0 Then
Cancel = True
MsgBox "Please use the button!"
End If
End Sub
 
D

Dave Peterson

As a user, I'm accustomed to using that X to close the form. Why make it more
difficult for me? Your userform could call the commandbutton_click procedure
associated with the Exit button.

Option Explicit
Private Sub CommandButton2_Click()
'clean up whatever you need to here.
Unload Me
End Sub
Private Sub Userform_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Call CommandButton2_Click
End If
End Sub
 
G

Guest

Thanks Dave.
But if I close the userfrom using the X it doesn`t save the data on the
textboxes. So the reason to use the commandbutton is to hide the userform so
that when opening it agian it has the details last entered.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top