sbeatton
Active Member
- Joined
- May 19, 2004
- Messages
- 411
Hello all
I have created a startup screen for my workbook but am having difficulties getting it to fade away/turn off. At the moment when the workbook is started up the startup screen shows however it does not close. My VBA is
Code for Userform:
Sub UserForm1_Activate()
Application.OnTime Now + TimeValue("00:00:03"), "KillTheForm"
End Sub
Code for "KillTheForm" in Module 1
Sub KillTheForm()
Unload UserForm1
End Sub
Anyone have any ideas?
Thanks
I have created a startup screen for my workbook but am having difficulties getting it to fade away/turn off. At the moment when the workbook is started up the startup screen shows however it does not close. My VBA is
Code for Userform:
Sub UserForm1_Activate()
Application.OnTime Now + TimeValue("00:00:03"), "KillTheForm"
End Sub
Code for "KillTheForm" in Module 1
Sub KillTheForm()
Unload UserForm1
End Sub
Anyone have any ideas?
Thanks