Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Splash Screen / userform
I have a splas screen showing with this code:
Private Sub UserForm_Activate() Const SS_DURATION As Long = 5 'seconds Application.OnTime Now + TimeSerial(0, 0, SS_DURATION), "KillTheForm" End Sub Is it possible to have the splash screen show without anything behind them for 5-10 seconds or while the workbook is loading. What I want the user to see is the splash screen alone for a short time. No Excel worksheets, No Excel tool bars, etc. Hank |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Splash Screen / userform
hi
Private Sub UserForm_Activate() Const SS_DURATION As Long = 5 'seconds application.visible = false Application.OnTime Now + TimeSerial(0, 0, SS_DURATION), "KillTheForm" 'application.visible = true 'see note End Sub application.visible = false will hide excel and leave only the form showing application.visible = true will unhide excel at the end of this sub note: you may want to put the application.visible = true at the end of of the sub KillTheForm. regards FSt1 "HH" wrote: I have a splas screen showing with this code: Private Sub UserForm_Activate() Const SS_DURATION As Long = 5 'seconds Application.OnTime Now + TimeSerial(0, 0, SS_DURATION), "KillTheForm" End Sub Is it possible to have the splash screen show without anything behind them for 5-10 seconds or while the workbook is loading. What I want the user to see is the splash screen alone for a short time. No Excel worksheets, No Excel tool bars, etc. Hank |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
userform startup splash screen | Excel Programming | |||
Splash screen and various screen resolutions | Excel Programming | |||
Splash Screen | Excel Programming | |||
Splash Screen | Excel Programming | |||
Splash Screen | Excel Programming |