エクセル VBA 入門 日付 Dateadd DateDiff

DateDiff
時間や日付を差を求める
Dateadd(書式,引く値,基準)
注意事項
この場合Dateとtimeは全て指定する形で設定しなければいけない。
エクセルのセルの設定は標準
Dateadd
時間や日付を加算する
Dateadd(書式,値1,値2)
注意事項
第二引数は数値を設定する
セルの設定は日付の場合は日付
時間は時間とした。

サンプルソース
———————————————————-
Option Explicit
Sub start()
Dim x As Date

Range(“A1”) = DateDiff(“yyyy”, Date, “2017/1/1”)
Range(“A2”) = DateDiff(“h”, Time, “20:00:00”)
Range(“A3”) = DateAdd(“yyyy”, 1, Date)
Range(“A4”) = DateAdd(“h”, 1, Time)

End Sub
———————————————————-

実行結果
1
-3
2017/4/25
0:02




シェアする

  • このエントリーをはてなブックマークに追加

フォローする

Translate »