プログラムで処理1~3までの流れがある場合に、処理1~処理3それぞれの処理時間(秒)を求めたいです。
<例>
処理1
処理2
処理3
処理1の前の現在時刻を求めておき、処理2に入ったときの現在時刻から処理1の前の現在時刻を引けば処理時間(秒)求めることができると思うのですが、プログラムでどのように実装すればよいかわかりません。
現在時刻を求めるプログラムは、
Public Function GetTimeLong() As Long
'処理時間
Dim stTime As SYSTEMTIME
'初期化
GetTimeLong = 0
InitSystemTime stTime
'取得して変換
If GetTime(stTime) = True Then
GetTimeLong = stTime.wMilliseconds ' ミリ秒
GetTimeLong = GetTimeLong + stTime.wSecond * 1000& ' 秒
GetTimeLong = GetTimeLong + stTime.wMinute * 1000& * 60& '分
End If
End Function
で求めることができると思います。
また、処理1~3までの得られた処理時間を、
処理1 処理2 処理3
○秒 ○秒 ○秒
とCSV形式ファイルで保存したい場合、どのようなプログラムを書けば実装できるのでしょうか?
どなたかご教授をして頂ければ助かります。
よろしくお願い致します。
No.1ベストアンサー
- 回答日時:
処理数が少ないなら、
ELTime0 = GetTimeLong()
処理1
ELTime1 = GetTimeLong()
処理2
ELTime2 = GetTimeLong()
処理3
ELTime3 = GetTimeLong()
のような形で必要データをそろえて計算してからCSVに書き出すことになると思います。
CSVの書き出しについては、検索するとたくさん出てきます。
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub0 …
http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd …
などなど
処理がいっぱいあって、書き出しながら処理を行いたいと考えているのなら、
処理1 処理2 処理3
○秒 ○秒 ○秒
のように書き出すのはあまり論理的ではありません。
処理1 ○秒
処理2 ○秒
処理3 ○秒
・・・・
としたほうがよいでしょう。 また、書き出すのにも時間がかかりますので、
処理ごとに書き出すなら、毎回処理前に時間を取り直す必要があります。
質問に対し、ご回答頂きありがとうございます。
おかげ様で、処理時間の取得とCSVファイルでの出力をすることができました。
ありがとうございました。また、機会がありましたらよろしくお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(開発・運用・管理) bashで15分前と現在のエポックタイムの時間を取得したい 2 2023/02/01 19:10
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 【再々投稿】VBAのプログラムで動作しなくて困っています 8 2022/10/14 09:06
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) Excel-VBAでのファイルの開き方 4 2023/02/14 11:01
- Visual Basic(VBA) vbaのエラー対応(実行時エラー7:メモリが不足しています) 4 2023/04/24 00:20
- Visual Basic(VBA) 【VBA】印刷マクロのループ処理が反映されません 3 2022/08/09 02:15
- Visual Basic(VBA) ExcelからAccessのテーブルに書き込む時に時間がかかる 1 2022/10/14 20:38
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelのマクロについて教えてく...
-
Vba 実数および実数タイプの変...
-
ユーザーフォームに別シートか...
-
VBA レジストリの値の読み方に...
-
エクセルVBAについて
-
VBA listBoxから
-
ExcelのVBAコードについて教え...
-
VBA 複数条件の分岐処理の上手...
-
ExcelのVBAです。フォルダ内の...
-
VBAの計算で@が出てしまう件
-
VB.net(VB)で、フォームにExcel...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
VBAの質問になります Userform内で
-
VBAの質問になります メッセー...
-
Excel マクロについての相談
-
Vba SelStart、SelLen教えてく...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBA 定義されたプロージ...
-
Excel-VBAのmsgBox()の不思議
-
【VBA】マクロの入ったファイル...
-
VBA 複数条件の分岐処理の上手...
-
現在のブックを閉じないで、マ...
-
VBAで各列の"+"と"o"の合計数を...
-
VBAに詳しい方教えてください。
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ユーザーフォームに別シートか...
-
エクセルのマクロについて教え...
-
ExcelVBA シート名を複数セルか...
-
エクセルのマクロについて教え...
-
VBA listBoxから
-
Excelのマクロについて教えてく...
-
エクセルのマクロについて教え...
おすすめ情報