UserForm - vis vha VBA kode
HejJeg har en SplashScreen som ved åbning af Workbook vises automatisk i 5 sekunder. Ved lukning af SplashScreen skal Userformen "Registration" herefter automatisk vises uden at bruger klikker på noget. (Registration er tænkt som en MultiPage Wizard med Forward og Back knapper som indeholder bla ComboBox for brugerinput.) SplashScreen åbner/lukker efter hensigten, men hvorledes programmeres userform'en "Registration" så den åbner automatisk når SplashScreen lukker ?
Flg kode for SplashScreen er oprettet og kører OK.
I modulet ThisWorkbook står:
Private Sub Workbook_Open()
SplashScreen.Show
End Sub
I kodemodulet for Userform står:
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:05"), "KillTheForm"
End Sub
I Module1 står:
Private Sub KillTheForm()
Unload SplashScreen
End Sub
Altså spørgsmålet er:
Hvilken kode skal bruges og i hvilke moduler skal den stå således "Registration" formularen åbner når "SplashScreen" lukker efter 5 sekunder?
