UserForm und Timer

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

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
Bild


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


Bild


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


 Bild

Beiträge aus den Excel-Beispielen zum Thema "UserForm und Timer "