how do i disable the close button on my userform?
or can i just remove it?

and when the user clicks cancel... is there a way to direct the user back to
sheet1 ?

Cheers
--

Hi,

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)
If CloseMode = vbFormControlMenu Then
' make user do what you want"
Cancel = True
End If
End Sub

HTH

where do i put this code?
--



"Carim" wrote:

Hi,

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)
If CloseMode = vbFormControlMenu Then
' make user do what you want"
Cancel = True
End If
End Sub

HTH

On Dec 14, 2:32 pm, Moh wrote:
where do i put this code?
--



"Carim" wrote:
Hi,

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)
If CloseMode = vbFormControlMenu Then
' make user do what you want"
Cancel = True
End If
End Sub

HTH- Hide quoted text -

- Show quoted text -

Hi
Double click your form and paste it in (the code module behind the
form)
regards
Paul

Open your form, hit F7 and copy code ...

where do i put this code?

In the UserForm's code module.

Hth,
Merjet

it doesn't work

pls help further
--



" wrote:

On Dec 14, 2:32 pm, Moh wrote:
where do i put this code?
--



"Carim" wrote:
Hi,

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)
If CloseMode = vbFormControlMenu Then
' make user do what you want"
Cancel = True
End If
End Sub

HTH- Hide quoted text -

- Show quoted text -

Hi
Double click your form and paste it in (the code module behind the
form)
regards
Paul

What exactly do you mean by "it doesn't work"?

Maybe you need to add a Command Button with
the following code:

Private Sub CommandButton1_Click()
Sheet1.Activate
Unload Me
End Sub