VBA 時分秒をそれぞれ取得する

VBAで、時分秒をそれぞれ取得するコードを記述してます。
環境
- OS windows10 64bit
サンプルコード
時分秒をそれぞれ取得するには、「TIME」に対してそれぞれ、時「Year」分「Minute」秒「Second」を使用します。
Debug.Print Hour(TIME) ' 13
Debug.Print Minute(TIME) ' 59
Debug.Print Second(TIME) ' 4
適当なボタンを用意して、セル上に時分秒をそれぞれ表示する
以下のソースコードを記述します。
ソースコード
Option Explicit
Private Sub CommandButton1_Click()
Cells(3, 2).Value = Hour(TIME)
Cells(3, 3).Value = Minute(TIME)
Cells(3, 4).Value = Second(TIME)
End Sub
ボタンをクリックすると、時分秒が表示されていることが確認できます。

-
前の記事
gitlab logを確認する 2022.09.22
-
次の記事
java エラー「Exception in thread “main” java.nio.file.InvalidPathException: Illegal char > at index 3」が発生した場合の対処法 2022.09.22
コメントを書く