Display worksheet while User Form Hides

[TriGuy51]

This code does not work to unhide a worksheet and show it while the user form is hidden. What code will work?

worksheetname.visible=True
worksheetname.Activate
UserForm.Hide
Application.OnTime Now TimeValue("00:00:10") "Show1"

Where Show1 is a subroutine that reshows the User Form.

Help!

 

[alan.m]

this may give you some food for thought:

Sub showhide()
    UserForm1.Hide 'or whatever name you gave your userform
    Worksheets("Sheet1").Visible = True 'or whatever is the name of you sheet
    'place code here
    Worksheets("sheet1").Visible = True
    UserForm1.Show
End Sub

 

[TriGuy51]

It didn't work. It doesn't matter where I place the userform.hide statement.

 

[alan.m]

It didn't work. It doesn't matter where I place the userform.hide statement.

A couple of things,
what does happen?
are you using userform.hide or userform1.hide? You need to use the name of your form which the default would be userform1
next - it does matter where you put the code. It should be in the form and you can get to it by pressing F7 when you are in the form.

 

[TriGuy51]

Yes, the code is in the form. Yes the name of the user form is correct.
No, the problem is still a mystery.

 

[TriGuy51]

I solved the problem. When hiding a User form, if you have a "User Form Activate" event subroutine, it executes every time the form reappears. So, I changed the code to have the User Form Activate event make the splash screen visible and the code now works perfectly.