excel vbaメモ:時間記録を実行するためのマクロ

時間記録のためのマクロを作成。

これを開きながらポチポチマクロボタンを押していけば、時間が自動的に記録されていく仕様となっております。

なぜこんなものをつくったのかというと。
どの時間になにが起きたかを記録していきたいと考えたためです。


###############################################
Sub 時間記録()

Dim i As Long

i = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Cells(i + 1, 1).Value = Format(Now, "hh:mm:ss")

End Sub

#########################


iは行数です。最下部の空欄ではないセルの番号です。
それに一つたせば最上部の空欄となる仕様。
そこにどんどん秒数単位で時間が記録されていくしくみです。

では。

この記事へのコメント