Excel VBA質問箱 IV

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

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


37197 / 76738 ←次へ | 前へ→

【44714】Re:マクロを毎日指定時刻に実行
回答  Kein  - 06/11/29(水) 17:50 -

引用なし
パスワード
   >パソコン(エクセル)24時間365日立ち上がっています。
ということなら、OnTimeメソッドを使ったコードで出来ます。
今からAM6:00にセットしたのでは、動作をチェックできませんから、
テスト用のコードを提示します。

Sub Sc_MyMacro()
  Application.OnTime TimeValue("17:55:00"), "Test1"
End Sub

Sub Test1()
  MsgBox Format(Time, "hh:mm:ss")
End Sub

これを標準モジュールに入れ、OnTime の引数の時刻を
「24時間表現で現在から2〜3分後」に書き直して、Sc_MyMacroを
実行して下さい。指定した時刻に、その時刻をメッセージできたら
成功です。本番では時刻設定の引数を TimeValue("06:00:00") に
変更し、次の引数"Test1"を、実行したいマクロのタイトルに変更
してSc_MyMacroを実行するだけです。スケジュールを破棄したいときは

Sub Sc_Stop()
  Application.OnTime TimeValue("06:00:00"), "マクロ名", , False
End Sub

を実行します。もちろんマクロ名は、そちらで設定した実際のマクロタイトル
に変更します。
0 hits

【44705】マクロを毎日指定時刻に実行 ジプ太郎 06/11/29(水) 16:23 質問
【44714】Re:マクロを毎日指定時刻に実行 Kein 06/11/29(水) 17:50 回答

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