知られざるExcel VBAの時間操作技！TimeValue関数で時刻を自在に操る方法

Excel VBAで時間を扱う場面、特に時刻のフォーマットや変換に悩むことはありませんか？例えば、セルの中に入力された時刻のデータをVBAで効率的に処理したいとき、TimeValue関数をどのように活用するかがカギとなります。この関数をマスターすれば、時間データを簡単に操作でき、業務効率が大きく向上することでしょう。この記事では、Excel VBAのTimeValue関数の使い方を基礎から応用まで解説し、あなたの作業を圧倒的に効率化する方法を伝授します。

TimeValue関数とは？
TimeValue関数を実際に使ってみよう
1. 基本的な例文字列から時刻への変換
2. 複数の時刻を扱う応用例
Excel VBA時間に関する疑問解決
Excelのことまだまだ分からない！どうしたらいい？
今すぐパソコンやスマホの悩みを解決したい！どうしたらいい？
まとめ

TimeValue関数とは？

Excelのイメージ

TimeValue関数の基本的な役割

Excel VBAのTimeValue関数は、文字列として表現された時刻をExcelで処理可能な日付型（Date型）またはバリアント型（Variant型）に変換するための関数です。例えば、「2:30 PM」や「14:30」といった時刻文字列を、VBAで計算や比較に使えるデータ型に変換できます。

TimeValue関数の構文

TimeValue関数は以下のように使用します。

vba

TimeValue(time)

この関数には1つの引数が必要で、それがtimeです。引数には「時:分:秒」の形式で表現された文字列を指定します。例えば、`”2:24 PM”` や `”14:24″` など、12時間または24時間形式の時刻文字列が適用可能です。

TimeValue関数で注意すべきポイント

TimeValue関数を使用する際には、次の点に注意する必要があります

ここがポイント！

文字列のフォーマットが正確でなければ、エラーが発生します。特にスペースや不要な文字が入らないように気を付けましょう。
日付情報はTimeValue関数では無視されますが、もし時間に加えて日付情報が含まれている場合、その日付部分は無視されます。
Nullが渡されるとNullが返されるため、引数にNullを渡さないようにすることが重要です。

TimeValue関数を実際に使ってみよう

基本的な例文字列から時刻への変換

実際に、TimeValue関数を使って文字列を時刻に変換する例を見てみましょう。

vba

Sub ExampleTimeValue()

Dim myTime As Date

myTime = TimeValue("14:35:00") ' 14:35:00 PM をDate型に変換

MsgBox myTime

End Sub

このコードを実行すると、`myTime` に格納されている時刻（14:35）が、VBA内で使える形式に変換されます。メッセージボックスでその結果を確認できるので、変換が成功していることがわかります。

複数の時刻を扱う応用例

複数の時刻データを一度に処理する場合、TimeValue関数を活用してリストや配列に時刻を格納し、必要な操作を行うことができます。例えば、次のコードは複数の時刻を一度に変換し、合計時間を計算する例です。

vba

Sub SumTimes()

Dim times(1 To 3) As String

Dim totalTime As Date

Dim i As Integer
 times(1) = "10:30:00"

times(2) = "02:45:00"

times(3) = "03:15:00"
 For i = 1 To 3

totalTime = totalTime + TimeValue(times(i))

Next i

MsgBox "合計時間: " & totalTime End Sub

ここでは、3つの時刻データを配列で管理し、それぞれをTimeValue関数で変換した後、合計時間を計算しています。このように、複数の時刻を処理する際にも非常に便利な関数です。