[Excel VBA]MsgBox（のようなもの）を指定秒数だけ画面に表示する方法

2008年3月 7日 17:43 | カテゴリ:
VBAでMsgBoxを表示すると、ＯＫボタンを押すまで処理が中断してしまうので不便だなーと思っていました。
調べてみたら、教えてGoo!に良いやり方が載っていました。

Sub test()
  Dim myShell As Object
  Set myShell = CreateObject("Wscript.Shell")
  myShell.PopUp "ここにメッセージ", 5, "ここにタイトル"
  Set myShell = Nothing
End Sub
ExcelのVBAでもPowerpointのVBAでもこのコードで動きます。
アプリの処理中に、ユーザにメッセージを伝えるのに使えそうですね。
プログレスバーで進捗表示してもいいんですが、処理が大げさになりがちなので、こっちの方が簡単ですね。
これは便利！
コメント(0) | トラックバック(0)

トラックバック(0)

トラックバックURL: http://dqn.sakusakutto.jp/mt/mt-tb.cgi/166

コメントする

Follow DQNEO on Twitter @DQNEO

人気記事

このブログ記事について

ひとつ前の記事:「[PHP] 初めての受託Web開発での失敗と教訓　前編」

次の記事:「[JavaScript][PHP][Perl] 配列を初期化するときの、最後のカンマの扱いについて」

最近のコンテンツはインデックスページで見られます。過去に書かれたものはアーカイブのページで見られます。

最近の人気記事

最近の記事

カテゴリ

検索

月別 アーカイブ

タグクラウド