VBA 現在時刻を取得する

  • 作成日 2022.07.28
  • vba
VBA 現在時刻を取得する

VBAで、現在時刻を取得するコードを記述してます。

環境

  • OS windows10 64bit

サンプルコード

現在時刻を取得するには、「TIME」を使用します。

Debug.Print TIME
' 13:35:01

適当なボタンを用意して、セル上に現在時刻を表示する
以下のソースコードを記述します。

ソースコード

Option Explicit

Private Sub CommandButton1_Click()

    Cells(3, 2).Value = TIME

End Sub

ボタンをクリックすると、現在時刻が表示されていることが確認できます。

以下のように、初めにフォーマットを指定すれば「AM・PM」は表示されなくなります。

Format(TIME, "hh:mm:ss")