1. Date関数(今日の日付を取得)
①サンプル文
'vbaコピーする編集するMsgBox Date
②解説
現在の日付を取得(時刻は含まない)。日付印刷やログの記録などに使用。
③例
'vbaコピーする編集するRange("A1").Value = "本日の日付: " & Date
④まとめ
現在日付を簡単に取得でき、日報や報告書で使いやすい。
2. DateAdd関数(日付の加減算)
①サンプル文
'vbaコピーする編集するMsgBox DateAdd("d", 7, Date) ' 今日 + 7日
②解説
指定した単位(”d”=日、”m”=月、”yyyy”=年など)で、日付に加減します。
③例
'vbaコピーする編集するDim dt As Date
dt = DateAdd("m", 1, Date)
Range("A2").Value = "来月の日付: " & dt
④まとめ
将来日や過去日を計算するのに最適。
3. DateDiff関数(日付の差)
①サンプル文
'vbaコピーする編集するMsgBox DateDiff("d", #2024/12/01#, Date) & "日経過"
②解説
2つの日付の差を単位(”d”=日、”m”=月など)で返す関数。
③例
'vbaコピーする編集するDim days As Long
days = DateDiff("d", #2025/01/01#, Date)
MsgBox "今年になって " & days & " 日経過しました"
④まとめ
日数計算や期限チェックによく使われます。
コメント