Herbers Excel-Forum - das Archiv
UserForm und Timer
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Betrifft: UserForm und Timer
von: walter p
Geschrieben am: 23.02.2005 11:39:27
hallo liebe community. habe folgendes problem. wenn ich meine excel datei öffne dann erscheint eine UserForm(frmStart) diese soll nach 5 Sekunden geschlossen werden. wie geht das. mein code bis jetzt:
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:05"), "msg"
End Sub
________________________________________________________________
Sub msg()
frmStart.hide
End Sub
eigentlich sollte das ja gehen. nur irgendwie schließt er die UserForm eben nicht. woran kann das liegen ?!
vielen dank im vorraus.
mfg walter
Betrifft: AW: UserForm und Timer
von: Heiko S.
Geschrieben am: 23.02.2005 11:59:35
Hallo Walter,
ich mach das so.
Private Sub UserForm_Activate()
Application.Wait (Now + TimeSerial(0, 0, 5))
Unload Me
End Sub
Gruß Heiko
Betrifft: AW: UserForm und Timer
von: walter p
Geschrieben am: 23.02.2005 12:03:55
japp danke klappt prima so wie du es geschrieben hast. :)
mfg walter