エクセルのＶＢＡで作成したmsgboxを自動にＯＫにする方法

質問

タイトル通りですが
自動にＯＫを洗濯させる方法ありませんか？
MsgBoxは確認用のＯＫしか出してません

ヨロシクお願いします

回答No.1

pulsa · ベストアンサー

マクロ上で、閉じる処理を入れるのであれば、こんなのがあります

　　Dim WSH As Object
　　Set WSH = CreateObject("WScript.Shell")

　　WSH.Popup "勝手に閉じます", 1, "自動終了MsgBox", 64
　　Set WSH = Nothing

ソースはこの辺
http://officetanaka.net/excel/vba/tips/tips21.htm

厳密にはMsgBoxではないけど、まぁ害は無いでしょう＾＾；
正確な時間で閉じさせる事が出来ないので、上手く行かない場合もあるけど、そんなときはDoEventsを直前に噛ませると多少改善されるよ

補足

時間経過-1を返してしまうからだめです
おしかった