日付や時刻に加算または減算する

サンプルソース

' 現在日時をstrNowにセット
strNow = Now()

Cells(1,1) = DateAdd("yyyy",1,strNow)
' strNowに+1年した日時を取得する

Cells(1,1) = DateAdd("m",1,strNow)
' strNowに+1ヶ月した日時を取得する

Cells(1,1) = DateAdd("d",1,strNow)
' strNowに+1日した日時を取得する

Cells(1,1) = DateAdd("h",1,strNow)
' strNowに+1時間した日時を取得する

Cells(1,1) = DateAdd("m",1,strNow)
' strNowに+1分した日時を取得する

Cells(1,1) = DateAdd("s",1,strNow)
' strNowに+1秒した日時を取得する

Cells(1,1) = DateAdd("yyyy",-1,strNow)
' strNowに-1年した日時を取得する

解説

DateAdd()は日付や時刻に加算します。

第1引数で、"yyyy"は年、"m"は月、"d"は日,"h"は時、"m"は分,"s"は秒を表します。
第2引数で、未来を求める場合は正の数を、過去を求める場合は負の数を指定します。





日付操作




Excel VBA講座




アクセスランキング


文字操作
関連する内容
データ型操作
日付操作
配列操作
ファイル操作
データベース操作
ディクショナリ操作


Copyright (C) Excel@Workshop All rights reserved.