エクセルのVBAでユーザーフォームを4秒ぐらいで閉じるようにするには

質問

お世話になります

マクロボタンを押すとウエルカムフォームが先に立ち上がり
ウエルカムフォームを4秒ぐらい表示させてからメインのユーザフォームを表示させたいのです。（4秒後はウエルカムフォームは自動で閉じさせたい）

ウエルカムフォームは一様FLASHを設置する予定です
わかる方お願いします

回答No.2

mitarashi · ベストアンサー

これでいかが。
Private Sub UserForm_Activate()
Application.Wait (Now + TimeValue("00:00:04"))
Unload Me
End Sub

回答No.1

fujillin

こういうことでしょか？
　http://www.accessclub.jp/bbs2/0032/beginter10591.html

一旦、開放する必要があるなら　OnTime メソッドかな？
　expression.OnTime(EarliestTime, Procedure, LatestTime, Schedule)