Vba で timevalue 関数を使用する方法 (例付き)

VBA でTimeValue関数を使用すると、指定された文字列の時刻値を返すことができます。

この関数を実際に使用する一般的な方法は次のとおりです。

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

この特定のマクロは、 A2:A7の範囲内の日付と時刻の時刻値を抽出し、その時刻値をB2:B7の対応する範囲に返します。

次の例は、この構文を実際に使用する方法を示しています。

例: VBA で TimeValue 関数を使用する方法

Excel に次の日付/時刻列があるとします。

A 列の各日時から時刻を抽出し、B 列に表示するとします。

これを行うには、次のマクロを作成できます。

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

このマクロを実行すると、次の出力が表示されます。

列 B には、列 A の各日付/時刻の時刻値が表示されます。

例えば：

• TimeValue 関数は 2023/01/01 10:15:34 の時点で10:15:34を返します
• TimeValue 関数は、2023/03/01 12:34:18 PM の時点で12:34:18 PMを返します。
• TimeValue 関数は、2023 年 1 月 5 日 8:23:00 の時点で8:23:00を返します。

等々。

注: VBA のTimeValue関数の完全なドキュメントは、ここで見つけることができます。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBA で日付を比較する方法
VBAを使用してタイムスタンプを挿入する方法
VBA で時間をフォーマットする方法