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