Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


67220 / 76732 ←次へ | 前へ→

【14071】Re:UserFormの自動終了と音の処理について
回答  IROC  - 04/5/20(木) 8:52 -

引用なし
パスワード
   >VBAでUserFormを5秒間だけ表示し

ヘルプに使用例が載っていました。


Wait メソッドの使用例

次の使用例は、実行中のマクロを当日の午後 6 時 23 分まで停止します。

Application.Wait "18:23:00"
次の使用例は、実行中のマクロを約 10 秒間停止します。

newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 10
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
次の使用例は、10 秒を過ぎるとメッセージを表示します。

If Application.Wait(Now + TimeValue("0:00:10")) Then
  MsgBox "時間が過ぎました。"
End If


>その後、音(サウンド)を鳴らす方法を
API関数を使うと出来ます。

http://homepage1.nifty.com/MADIA/vb/API/sndPlaySound.htm
2 hits

【14070】UserFormの自動終了と音の処理について TOKU 04/5/19(水) 22:48 質問
【14071】Re:UserFormの自動終了と音の処理について IROC 04/5/20(木) 8:52 回答
【14083】Re:UserFormの自動終了と音の処理について TOKU 04/5/20(木) 16:50 質問
【14090】Re:UserFormの自動終了と音の処理について IROC 04/5/20(木) 18:30 回答
【14091】Re:UserFormの自動終了と音の処理について TOKU 04/5/20(木) 18:38 お礼

67220 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free