VBA 応用 taka

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



The following two tabs change content below.

taka

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

どうも、takaです(^^♪

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

 

特別企画！IT企業の実情をIT企業の社長に聞いてみた！

独学者が多いVBAプログラマー「せっかくプログラム言語を覚えたし、IT企業に転職しようかな？でも、IT企業って良いイメージ聞かないし実際はどうなんだ？」という疑問にIT企業の社長に直に聞いてみました！！
記事を見てみる

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

RECOMMENDこちらの記事も人気です。