UserForm und Timer

• UserForm und Timer von walter p vom 23.02.2005 11:39:27
• AW: UserForm und Timer - von Heiko S. am 23.02.2005 11:59:35
  • AW: UserForm und Timer - von walter p am 23.02.2005 12:03:55

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

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