Form Hiding & Screen Updating

[Carly]

I have got a form with the following code attached to a button:

Private Sub btn_Stage1_Click()
    If txtMonth.Value = "" Then
        MsgBox ("You need to enter a month MMMYY")
        txtMonth.SetFocus
    Else
    vMonth = txtMonth.Value
        frmStages.Hide
        Call Stage1
    End If
End Sub

which then calls this code:

Sub Stage1()
    Application.ScreenUpdating = False
    .....etc

When I debug through this code, it works, hides the form & works through the rest of the code but then I run it properly, the form is always in view.

Is there anything I am doing wrong?

 

[Trevor G]

Rather than hide try unload me

 

[Carly]

Thanks for the reply.
This does exactly the same thing though, plus unloads all the data which I need later on when I reload the form.

 

[Trevor G]

OK what about dealing with the screen updating prior to hiding the form

Application.ScreenUpdating = False
UserForm1.Hide
Application.ScreenUpdating = True

 

[RoryA]

Have you by any chance disabled screenupdating before you showed the form in the first place?

 

[Carly]

Thank you for your replies as always:

I have now changed it to the following and it works perfectly:

Private Sub btn_Stage1_Click()
    If txtMonth.Value = "" Then
        MsgBox ("You need to enter a month MMMYY")
        txtMonth.SetFocus
    Else
    vMonth = txtMonth.Value
        Application.ScreenUpdating = False
        frmStages.Hide
        Application.ScreenUpdating = True
        Call Stage1
    End If
    
End Sub