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

Excel-Beispiele zum Thema "UserForm und Timer "
Diagramm in Userform	XL-Dateien in UserForm listen
UserForm an Excel-Fenster anpassen	Fundstellen in UserForm listen
Module und UserForms austauschen	In einer Schleife auf Elemente einer UserForm zugreifen
Werte in eine ComboBox einer UserForm übernehmen	Zellinhalt als Label-Aufschrift in UserForm
Alle CheckBoxes einer UserForm ansprechen	Wenn kein Eintrag, UserForm nicht schließen