VBA 時間指定でマクロを実行するOnTimeメソッド

The following two tabs change content below.

• この記事を書いた人
• 最新の記事

taka

あることがキッカケでVBAを独学で勉強しました、今ではブログを通してVBAでできることを解説しつつ、VBAや他の言語の勉強、ブログ運営の勉強をしています(^^♪

最新記事 by taka (全て見る)

• VBAでテキストファイルを操作する方法 - 2019年1月17日
• VBA　【クラスモジュールとは？】クラスモジュールについて - 2018年12月24日
• VBA　スピンボタンで日付を変更する - 2018年12月9日
• 【雑記】MicrosoftOfficeのアイコンが変わるらしいですよ - 2018年11月30日
• ExcelとPowerPointの連携パート2【シェイプのテキストを取得する】 - 2018年11月29日

どうも、taka(@takabou63)です(^^♪

VBAで時間を指定してプログラム(マクロ)を実行できたらいいのになぁ・・・

なんて思ったことはありませんか？・・・ないかもしれませんね(笑)

ですが、せっかくある機能なので今回は「時間指定でマクロを実行するOnTimeメソッド」をご紹介していきます(^-^)

Application.OnTimeメソッド

Application.OnTimeメソッドの書式

さて、指定した時間にVBAを実行したい場合には【Applicationオブジェクト】の【OnTimeメソッド】を使用します、OnTimeメソッドの書式は以下の通りです。

というわけで少しわかりにくい部分もありますのでMicrosoftの解説を引用いたしますと

OnTime( EarliestTime, Procedure, LatestTime, Schedule )

名前	必須 / 省略可能	データ型	説明
EarliestTime	必須	バリアント型 (Variant)	プロシージャを実行する時刻を指定します。
Procedure	必須	文字列型 (String)	実行するプロシージャ名を指定します。
LatestTime	省略可能	バリアント型 (Variant)	プロシージャを実行できる最終時刻を指定します。たとえば、引数 LatestTime に、引数 EarliestTime で設定した値 + 30 を設定します。引数 EarliestTime に指定した時刻にはほかのプロシージャを実行しているため、Excel は待機、コピー、切り取り、または検索のいずれのモードでもないとします。その場合、Excel は実行中のプロシージャが終了するまで 30 秒間待ちます。30 秒以内に Excel が待機モードにならないとき、指定したプロシージャは実行されません。この引数を省略すると、Excel はプロシージャが実行できるまで待ちます。
Schedule	省略可能	バリアント型 (Variant)	新しい OnTime プロシージャを設定するには、 True を指定します。直前のプロシージャの設定を解除するには、 False を指定します。既定値は True です。

参照：Microsoft

つまり、引数のLatestTimeは、指定時間時に他のプロシージャーを実行中で呼び出したプロシージャーが実行できない場合何秒待ちますか？ということですね！

Application.OnTimeメソッドの使用例

さて、このOnTimeメソッドは実際どのように使用例を考えましたのでご紹介します！

使用例1：時間でお知らせ

1番オーソドックスかもしれませんが、12時になったらメッセージボックスを表示するプログラムです(^-^)

使用例2：秒数指定で実行

inputboxで指定した時間(秒数)後にプロシージャーを実行します。

他にも使い道はいくらでもある

というわけで、OnTimeメソッドをご紹介しましたが他にもいくらでも使い道はあると思うんですよ。

Outlookと連携してメールの時間指定送信だとか、タイマーの代わりだとか、個人的にはメール関係とすごく相性がいいような気がしますので会社のツールにも応用しようかと思います(笑)

ファイルやコードの利用、WEBサイトの利用について

Sponsored Link