連続で、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も見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
エクセル VBA 「Sub Auto_Open()」 について
その他(Microsoft Office)
-
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
VBA メッセージボックスを自動で消したい
Visual Basic(VBA)
-
-
4
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
5
VBSで応答不要のメッセージボックスを表示したい
その他(パソコン・スマホ・電化製品)
-
6
VBA ポップアップが表示されたら常に「はい」を選択したい
Access(アクセス)
-
7
VBScriptでMsgBoxのYesNoボックスを自動的にクリックしたい
その他(プログラミング・Web制作)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
Access 無操作の場合、自動で閉じたいです。
Access(アクセス)
-
10
Excel-VBAの「しばらくお待ちください」のダイアログが自動的に閉じない
Excel(エクセル)
-
11
フォントの大きさ
Visual Basic(VBA)
-
12
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
13
《エクセルVBA》「他の人が該当ファイルを使用中の場合」の処理
Excel(エクセル)
-
14
マクロで、次のコードへ行く前に時間をおくにはどうしたらいいのでしょうか?
その他(Microsoft Office)
-
15
VBAにてメッセージボックスを最前面に表示させる
その他(プログラミング・Web制作)
-
16
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
17
エクセルマクロ 自動でMSGボックスを閉じてクリッ
Excel(エクセル)
-
18
VBAにて別ワークブック上の実行したマクロのメッセージボックスを操作
Visual Basic(VBA)
-
19
ExcelVBAで今開いているユーザ情報を取得できますか?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
スタティックテキストが表示さ...
-
VBA、UserFormを前面に出力して...
-
ACCESS側からEXCELの書式を設定...
-
【C#】 あるイベントから別イ...
-
VBSで応答不要のメッセージボッ...
-
InvalidateRectがうまくいかない
-
マウスのクリックを無視したい
-
メッセージボックスのボタン名変更
-
VBA kernel32 の意味
-
起動後直に実行するコードはど...
-
Excel VBA 自動的に閉じるMsgBox
-
WEB上にボタンが押せない
-
DirectX環境下での方向キー同時...
-
VB.NET開発(イベントプロシー...
-
スケジューリング方式
-
VBSの処理中一旦処理を止めて再...
-
MFCのView終了時の終了確認
-
VCでウエイトをミリ秒でかけ...
-
VBA メッセージボックスを自動...
-
Application.ScreenUpdating=Fa...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
メッセージボックスのボタン名変更
-
VBSの処理中一旦処理を止めて再...
-
VBSで応答不要のメッセージボッ...
-
ACCESS側からEXCELの書式を設定...
-
VBA メッセージボックスを自動...
-
Application.ScreenUpdating=Fa...
-
VBA kernel32 の意味
-
エクセルVBAでクリップボード内...
-
Excelのワークシートに行を挿入...
-
Excel VBA で処理中断(DoEvents...
-
【C#】 あるイベントから別イ...
-
手動かプログラムでの起動かの判断
-
ASP.NETでのメッセージ画面を出...
-
Excel VBA 自動的に閉じるMsgBox
-
シャットダウン時のExcel強制終...
-
VBA、UserFormを前面に出力して...
-
<input type="file">タグで「キ...
-
Excel VBA 実行中に一瞬フリー...
-
「キャンセル」ボタン付きの処...
-
EXCEL VBA「Application.Displa...
おすすめ情報