日付時刻:日付時刻データを計算( DateAdd 関数 )
2015/08/26
DateAdd 関数(日付・時刻の値を加算・減算結果を取得)
【書式】
result_date = DateAdd ( interval, number, date )
【引数・戻り値】
- interval ・・・ 加減する時間間隔の単位を文字列式で指定します。(下表「時間間隔の単位を示す単位」を参照)
- number ・・・ 加減する時間間隔の数値・数式を指定します(将来の日時を取得する場合は正数、過去の日時を取得するには負数を指定します)。
- date ・・・ 元となる日付・時刻を指定します(内部処理形式 Date のバリアント型の値、もしくはリテラル文字列)。
- result_date ・・・ 引数 date に、number を加算(減算)した日付(バリアント型の値)。
時間間隔の単位を示す単位(interval に指定する値)の一覧
値 | 内容 | 備考 |
yyyy | 年 | |
q | 四半期 | |
m | 月 | |
y | 年間通算日 | ※ d を設定した時と同じ結果になる |
d | 日 | |
w | 週日 | ※ d を設定した時と同じ結果になる |
ww | 週 | |
h | 時 | |
n | 分 | ※ 注意「m」ではなく「n」 |
s | 秒 |
DateAdd 関数の使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Sub Sample_DateAdd() Dim myDate As Date Dim msg myDate = #1/1/2015# msg = "元日付 :" & myDate & Chr(13) & _ "d(日) 3200:" & DateAdd("d", 3200, myDate) & Chr(13) & _ "y(年日)3200:" & DateAdd("y", 3200, myDate) & Chr(13) & _ "w(週日)3200:" & DateAdd("w", 3200, myDate) & Chr(13) & _ "d(日) -32:" & DateAdd("d", -32, myDate) & Chr(13) & _ "y(年日) -32:" & DateAdd("y", -32, myDate) & Chr(13) & _ "w(週日) -32:" & DateAdd("w", -32, myDate) & Chr(13) & _ "yyyy(年) 1:" & DateAdd("yyyy", 1, myDate) & Chr(13) & _ "q(四半期) 1:" & DateAdd("q", 1, myDate) & Chr(13) & _ "n(分)40 :" & DateAdd("n", 40, myDate) & Chr(13) & _ "ww(週)1 :" & DateAdd("ww", 1, myDate) Debug.Print msg End Sub |
実行結果
関連記事
-
-
式の値に応じて多分岐を行う(Switch 関数)
Switch 関数 の使い方 Switch 関数は、「式・値」を対にして指定して …
-
-
文字列:文字列の空白を削除(Trim 関数, LTrim関数, RTrim関数)
Trim 関数・LTrim 関数・RTrim 関数の使い方 【書式】 <先頭と末 …
-
-
文字列:2つの文字列を比較する(StrComp 関数)
StrComp 関数の使い方 【書式】 result = StrComp ( s …
-
-
フォント 太字・斜体(Bold, Italic, FontStyle プロパティ)
太字の設定(Bold プロパティ) Bold プロパティは、フォントを太字にする …
-
-
指定した値を16進数で表記した文字列に変換する(Hex 関数)
Hex 関数 の使い方 【書式】 result = Hex ( expressi …
-
-
文字列:文字列の指定した位置から指定文字数取得(Mid 関数,MidB 関数)
Mid 関数・MidB 関数 の使い方 【書式】 result_mid = Mi …
-
-
VBA の演算子(演算子の優先順位)
演算子の優先順位 演算子の優先順位とは、1つの式の中に演算子が複数ある場合、どの …
-
-
RGB 値一覧表(XlRgbColor 列挙型)
RGB 値(XlRgbColor 列挙型)一覧表 RGB 関数を使用して、出力さ …
-
-
変数がオブジェクト型かどうかをチェックする( IsObject 関数 )
IsObject 関数の使い方 【書式】 result = IsObject ( …
-
-
Array 関数(バリアント型の配列を作成)
Array 関数の使い方 【書式】 myArray = Array ( elem …