文字列から日付と時刻を数値として取得する【DateValue/TimeValue関数】【ExcelVBA】

文字列から日付と時刻を取得する

セルに入力した日時を数値として取得するには、DateValue関数とTimeValue関数を使用します。

構文
DateValue(date)

TimeValue(time)

日時を抽出するサンプルコード

Public Sub Sample()
  'A1セルに日時を文字列で入力する
  Range("A1") = "2025年1月31日 5時12分00秒"
  
  '■日付のみを数値として取得する
  Debug.Print DateValue(Range("A1").Value)
  
  '■時刻のみを数値として取得する
  Debug.Print TimeValue(Range("A1").Value)

End Sub

注意点

• DateValueは日付のみ、TimeValueは時刻のみを返します。
• セルに時刻のみを入力した場合、上記サンプルコードではエラーが生じます。
  ※これはデータが「シリアル値」となってしまうのが原因です。解決方法はこちら。

関連記事

• セルに入力した時刻をTimeValueに設定する際「型が一致しません」が表示される
• 年/月/日から日付データを取得する【DateSerial関数】
• 時/分/秒から時刻データを取得する【TimeSerial 関数】