[VBA][Excel]DateValue と TimeValue

※全てのExcelで動作する保証はありません。また、内容に関し管理人は全ての責任を負いかねます

サンプル ※説明に必要な部分しか記述していません

下記を実行すると

Private Sub CommandButton1_Click()

'文字列をバリアント型(内部処理形式 Date)で返します
Sheet1.Range("A1").Value = DateValue("2016/4/6")

'引数を日付型(Date)で返します
Sheet1.Range("A2").Value = CDate("2016/4/6")


'文字列をバリアント型(内部処理形式 Date)で返します
Sheet1.Range("A4").Value = TimeValue("9:11:12")
Sheet1.Range("A5").Value = TimeValue("9:11:12 PM")


'時刻が含まれていても日付のみをバリアント型で返します
Sheet1.Range("A7").Value = DateValue("2016/4/7 10:34:56 AM")

'日付が含まれていても時刻のみをバリアント型で返します
Sheet1.Range("A8").Value = TimeValue("2016/4/7 10:34:56 AM")

End Sub

このようになります。

vba-excel-datevalue-timevalue

関連情報 CDate
https://byte.sakura.ne.jp/code/vbaexcel%E6%97%A5%E4%BB%98%E3%81%AB%E5%A4%89%E6%8F%9B%E3%80%80cdate%E9%96%A2%E6%95%B0/