VBA Time 関数

はじめに

Excel VBA マクロの Time 関数を紹介します。

Time 関数は、現在の時刻を返します。

今の時間を取得したいときに使用します。

• 現在の日時を取得するには「Now 関数」を使用します。
• 現在の日付を取得するには「Date 関数」を使用します。

構文

Time()
現在の時刻を取得します。

戻り値の型

日付型 (Date)

解説

現在の時刻を返します。

Time + #1:00:00#で 1 時間後、Time - #0:10:00#で 10 分前の時刻を求められます。

「DateAdd 関数」を使用しても日時の計算ができます。

使用例

現在日時が2013/01/02 3:04:05のとき。

Dim d As Date

d = Time
Debug.Print(d) ' 3:04:05

d = Date
Debug.Print(d) ' 2013/01/02

d = Now
Debug.Print(d) ' 2013/01/02 3:04:05

時刻を計算する。

Dim d As Date

' 1 時間後
d = Time + #1:00:00#      
Debug.Print(d) ' 4:04:05

d = DateAdd("h", 1, Time)
Debug.Print(d) ' 4:04:05
  
' 10 分前
d = Time - #0:10:00#        
Debug.Print(d) ' 2:54:05
  
d = DateAdd("n", -10, Time)
Debug.Print(d) ' 2:54:05