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
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
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
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.