top of page

​タグ一覧

配列処理(73)

階層化フォーム(33)

ファイル操作(28)

開発事例(22)

シート・セル操作(18)

図形操作(13)

コード自動生成(10)

ユーザーフォーム(9)

文字列操作(8)

設計思想(7)

開発効率化(6)

数学(6)

GAS(5)

アニメーション(5)

技術解説(4)

講座実施報告(5)

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

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

副業(4)

クリップボード(4)

条件付き書式(4)

その他(4)

ココナラ(3)

小説(3)

HTML(3)

JavaScript(3)

OneDrive(2)

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

Enum(2)

PDF(2)

フリーランス(2)

リスキリング(2)

Outlook(2)

介護(2)

Discord(2)

シフト表(2)

LookerStudio(2)

日報(2)

カレンダー(2)

罫線(2)

パズル(2)

小ネタ(2)

コード解説(2)

クラスモジュール(2)

ステータスバー(1)

コード解析(1)

バックアップ(1)

可変長引数配列(1)

ブック処理(1)

スクレイピング(1)

スプレッドシート(1)

coconala(1)

リボン登録マクロ(1)

QRコード(1)

実行予約(1)

給与計算(1)

VBA不使用(1)

リボン(1)

超勉強会(1)

スピログラフ(1)

図名描写(1)

連想配列(1)

溶接ロボット(1)

保育士(1)

楽天市場(1)

経理(1)

医療(1)

文書作成(1)

発注書(1)

ショートカット(1)

WebAPI(1)

色操作(1)

スーパー開発ショートカット(1)

ライブラリ処理(1)

放課後等デイサービス(1)

児童福祉支援(1)

学校(1)

UI(1)

CAD(1)

カーソル操作(1)

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

更新日: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

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

  • Facebook
  • Twitter
  • YouTube

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

bottom of page