連続で、Popupを使う際に、途中で、他の処理を実行すると、Popupが自動で消えなくなってしまいます。
下のサンプルにて、GetOpenFilename をコメントアウトすれば、Popupは、正常に機能(指定時間後に自動で消える)しますが、GetOpenFilename を入れると、メッセージは、自動で消えなくなってしまいます。
、
Sub mySample()
Dim WSH As Object
Dim FileName As String
Set WSH = CreateObject("WScript.Shell")
WSH.Popup "1秒後、自動的に閉じる", 1, "Title", vbInformation
WSH.Popup "1秒後、自", 1, "Title", vbInformation
FileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls?", , "Title")
WSH.Popup "1秒後、自動", 1, "Title", vbInformation
WSH.Popup "1秒後、自動的", 1, "Title", vbInformation
Set WSH = Nothing
End Sub
途中に処理を入れても、メッセージが自動で消えるようにしたいのです。
サジェスチョンがあれば、よろしくお願いします。
尚、Windows8.1,Excel2010です。
下記を参考にしてはいます。
Office TANAKA(http://officetanaka.net/excel/vba/tips/tips21.htm)
No.1ベストアンサー
- 回答日時:
こちらの
https://oshiete.goo.ne.jp/qa/5393997.html
#6さんのMessageBoxTimeoutA を使う方法、
#7さんのUserForm を使う方法がよろしいかと。
MessageBoxTimeoutA の方がお手軽かな。
※ WScriptのpopup はあてになりません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excel-VBAの「しばらくお待ちください」のダイアログが自動的に閉じない 2 2023/05/24 15:31
- Visual Basic(VBA) マクロVBA 1シートをまとめる 閉じ方 初心者 SOS! 1 2022/06/17 14:54
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- Visual Basic(VBA) 2つ目のコンボボックスが動作しません。 3 2023/03/25 12:29
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
エクセル VBA 「Sub Auto_Open()」 について
その他(Microsoft Office)
-
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
VBA メッセージボックスを自動で消したい
Visual Basic(VBA)
-
-
4
Excel-VBAの「しばらくお待ちください」のダイアログが自動的に閉じない
Excel(エクセル)
-
5
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
6
VBSで応答不要のメッセージボックスを表示したい
その他(パソコン・スマホ・電化製品)
-
7
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
8
VBScriptでMsgBoxのYesNoボックスを自動的にクリックしたい
その他(プログラミング・Web制作)
-
9
VBA ポップアップが表示されたら常に「はい」を選択したい
Access(アクセス)
-
10
エクセルマクロ 自動でMSGボックスを閉じてクリッ
Excel(エクセル)
-
11
フォントの大きさ
Visual Basic(VBA)
-
12
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
13
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
14
html上で、バッチやexeファイルの起動をしたい
ホームページ作成・プログラミング
-
15
VBAにてメッセージボックスを最前面に表示させる
その他(プログラミング・Web制作)
-
16
別のシートから値を取得するとき
Visual Basic(VBA)
-
17
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
18
マクロで、次のコードへ行く前に時間をおくにはどうしたらいいのでしょうか?
その他(Microsoft Office)
-
19
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
20
エクセルVBAで、MsgBox やInputBox は、画面の中央以外に表示させたい。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
メッセージBOXの「はい」「いい...
-
「キャンセル」ボタン付きの処...
-
VBSの処理中一旦処理を止めて再...
-
VBSで応答不要のメッセージボッ...
-
VBA kernel32 の意味
-
メッセージボックスのボタン名変更
-
Excel(VBA)シート上のコマンド...
-
キーボード入力、マウス操作を...
-
VCでウエイトをミリ秒でかけ...
-
VBA メッセージボックスを自動...
-
VB6 コマンドボタン クリック...
-
ASP.NETでのメッセージ画面を出...
-
PostMessageの連続送信
-
エクセルVBAでクリップボード内...
-
VB.NETのUsingキーワードの使い方
-
ASP VBScriptでスクリプト実行...
-
緯度、経度の 10進法と 60進法...
-
Macターミナルで実行中のプログ...
-
C言語で、メモリを解放しないで...
-
バックグラウンドのプロセスの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBSの処理中一旦処理を止めて再...
-
メッセージボックスのボタン名変更
-
ACCESS側からEXCELの書式を設定...
-
VBSで応答不要のメッセージボッ...
-
VBA kernel32 の意味
-
エクセルVBAでクリップボード内...
-
【C#】 あるイベントから別イ...
-
Excel VBA で処理中断(DoEvents...
-
VBA メッセージボックスを自動...
-
Application.ScreenUpdating=Fa...
-
Excel VBA 自動的に閉じるMsgBox
-
ASP.NETでのメッセージ画面を出...
-
メッセージBOXの「はい」「いい...
-
「キャンセル」ボタン付きの処...
-
B列に特定の文字列が入っている...
-
シャットダウン時のExcel強制終...
-
ASP VBScriptでスクリプト実行...
-
起動後直に実行するコードはど...
-
MFCのメニューバーのイベント取得
-
アクセスでのキー送信について
おすすめ情報