UserForm.Show opens a userform, now how do I close it?

Hi OdinsDream,

Try "Unload Me", simple as that!

"Unload Me" can be placed in the code for the CommandButton itself?

unload userform is the command to close the userform
or
me.unload
userform.hide will hide the form but not close it, if you need it again and don't what to repopulate it.

Ok, that worked great. I have a follow-up question.

When the macro runs, the first thing I do is Application.ScreenUpdating = False, of course. The UserForm is then presented, and values are entered. When it closes, the image of the form remains on-screen (even though it's not there) because ScreenUpdating is off....

At the end of your sub put
Application.ScreenUpdating = True

I surrounded the call to UserForm.Show with screenupdate toggling...

Application.ScreenUpdating = True
UserForm.Show
Application.ScreenUpdating = False

And the form was still left on the screen. The solution ended up putting a Window().Activate statement after the Show command.

Are you using XP, the Screenupdating function in xp is different to the previous versions and is a pain in the *** to use with userforms.

BRett

Hi OdinsDream,

Could you post details of the code that you are using? The advice given by Dragracer should have worked, but I don't follow the logic of the example in your last post - you have true first and then false.

By way of example, the following routine calls a simple userform and the second routine (UserForm_Activate) is located within the form itself.<pre>
Sub test()

Application.ScreenUpdating = False
'
'your code here
'
UserForm1.Show
'
Application.ScreenUpdating = True

End Sub</pre><pre>

Private Sub UserForm_Activate()
Application.Wait (Now + TimeValue("0:00:04"))
Unload Me
End Sub</pre>

Any good?


_________________<font color="blue"> «««<font color="red">¤<font color="blue"><font size=+1>Richie</font><font color="red">¤<font color="blue"> »»»</font>

</gif>
This message was edited by Richie(UK) on 2002-07-30 03:48

Hi, sorry if my previous post was confusing. Here's the idea.

My macro runs and turns off screen updating, using only the status-bar for updates. The user form in question is not guranteed to be called, but depends on conditions.

If the userform is required, I called UserForm.Show. After I was done, and unloaded the form, the image remained, since screen updating was off.

I then tried turning screen updating on, right before Show. Then, of course, turning it back off after Show had finished.

When I tried this, it still failed. The solution ended up putting the statement Windows("Special Tasks.xls").Activate directly after UserForm.Show, then turning screen updating off.