Thread: start up screen
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
jpendegraft[_2_] jpendegraft[_2_] is offline
external usenet poster
 
Posts: 1
Default start up screen

Commonly called a "Splash Screen"

This will require a few steps:

1) Design a Userform that you want to appear (let's say it is calle
UserForm1)

2) Code the UserForm to open upon opening the workbook. This wil
need to be done in the "This Workbook" part.

Private Sub Workbook_Open()
UserForm1.Show
End Sub

3) Code the timing after it opens

Private Sub UserForm1_Activate()
Application.OnTime Now + _
TimeValue("00:00:03"), "KillTheForm"
End Sub

4) Code the "Kill the form" module that you call in the las
procedure...

Private Sub Killthe Form()
Unload Userform1
End Su

--
Message posted from http://www.ExcelForum.com