top of page

​タグ一覧

配列処理(76)

シート・セル操作(34)

階層化フォーム(33)

ファイル操作(31)

開発事例(26)

図形操作(24)

設計思想(14)

講座実施報告(12)

ユーザーフォーム(10)

開発効率化(10)

コード自動生成(10)

数学(9)

ココナラ(9)

文字列操作(8)

イベントプロシージャ(7)

GAS(7)

Webアプリ(6)

その他(5)

アニメーション(5)

副業(5)

Googleスプレッドシート(4)

OneDrive(4)

技術解説(4)

条件付き書式(4)

イミディエイトウィンドウ(4)

クリップボード(4)

介護・福祉(4)

小説(3)

JavaScript(3)

HTML(3)

公開ツール(3)

クラスモジュール(2)

コード解説(2)

パズル(2)

小ネタ(2)

日報(2)

フリーランス(2)

シフト表(2)

Antigravity(2)

PDF(2)

カレンダー(2)

Enum(2)

LookerStudio(2)

リスキリング(2)

Discord(2)

Outlook(2)

デスクトップアプリ(2)

スクレイピング(1)

WebAPI(1)

PowerShell(1)

文書作成(1)

スプレッドシート(1)

経理(1)

超勉強会(1)

溶接ロボット(1)

楽天市場(1)

VBA不使用(1)

実行予約(1)

CAD(1)

給与計算(1)

QRコード(1)

医療(1)

python(1)

学校(1)

発注書(1)

StopWatch|VBAプログラムの実行時間をストップウォッチのように計測する

2024年1月14日
読了時間: 1分

更新日:1月4日


VBAプログラムの実行時間をストップウォッチのように計測する

<概要(ストップウォッチ,実行時間計測,VBA)>

今回は、既存のVBAコードにおける実行時間をストップウォッチのように計測する汎用プロシージャを紹介します。



<用途>


  • 既存処理の実行時間を計測して、プログラムの中で時間を要している処理を特定する



<プロシージャ紹介>


Public Sub StopWatch([Reset As Boolean = False])


名前: StopWatch /Subプロシージャ

説明: 1回目の実行で計測を開始し、以降の実行で計測開始からの経過時間と前回実行時からの経過時間をイミディエイトウィンドウに表示する



'引数

'Reset・・・計測をリセットするかどうか(省略ならリセットしない)



<実行例>


次のようなコードを用意します。


各処理過程の途中途中でStopWatchプロシージャを実行しますが、最初の1回目は引数をTrueとして計測を初期化します。ストップウォッチでいえば「Start」です。

2回目以降のStopWatchプロシージャ実行では引数をFalseとして途中の実行時間をイミディエイトウィンドウに表示させます。



実際にイミディエイトウィンドウに結果が表示されます。

イミディエイトウィンドウ実行結果
イミディエイトウィンドウ実行結果


<サンプルファイル>




<コード>


 Gist



Excel VBAによる業務自動化・ツール開発をご検討の方へ

​"脱Excel"の前に、現状のExcelの潜在能力を120%発揮してみませんか?

softex-celwareロゴ 透過 横長.png

​インボイス登録番号:T5810983887134

  • Facebook
  • Twitter
  • YouTube

©2023 softex-celware。Wix.com で作成されました。

bottom of page