DatePart 関数

DatePart(syrInterval, varDate [, firstdayofweek, firstweekofyear])

指定された日付の一部分を返します。

引数

syrInterval
時間間隔の単位を表す文字列式を指定します。
設定値 内容
yyyy
q 四半期
m
y 年間通算日
d
w 週日
ww
h
n
s
varDate
評価する日付式を指定します。
firstdayofweek
省略可能です。
週の始まりの曜日を表す定数を指定します。省略すると、日曜日が指定されます。
定数 内容
vbUseSystemDayOfWeek 0 各国語対応 (NLS) API の設定値を使用します。
vbSunday 1 日曜
vbMonday 2 月曜
vbTuesday 3 火曜
vbWednesday 4 水曜
vbThursday 5 木曜
vbFriday 6 金曜
vbSaturday 7 土曜
firstweekofyear
省略可能です。
年度の第 1 週を表す定数を指定します。省略すると、1 月 1 日を含む週が第 1 週と指定されます。
定数 内容
vbUseSystem 0 各国語対応 (NLS) API の設定値を使用します。
vbFirstJan1 1 (既定値) 1 月 1 日を含む週を年度の第 1 週として扱います。
vbFirstFourDays 2 7 日のうち少なくとも 4 日が新年度に含まれる週を年度の第 1 週として扱います。
vbFirstFullWeek 3 全体が新年度に含まれる最初の週を年度の第 1 週として扱います。

使用例

次のコードは、DatePart 関数を使って日付を取得し、その四半期を表示します。

Function GetQuarter(TheDate)
   GetQuarter = DatePart("q", TheDate)
End Function
              

解説

DatePart 関数を使うと、日付を評価し、特定の時間間隔部分を取得できます。たとえば、週日や現在の時刻などを計算できます。
引数 firstdayofweek は、引数 interval に週 ("w" および "ww") を指定した場合の計算値に影響します。
引数 date に日付リテラルを指定した場合、指定した年が日付の固定部分となります。ただし、引数 date をダブル クォーテーション (") で囲み、年を省略すると、引数 date の式が評価されるたびにコードに現在の年が挿入されます。これを利用すると、異なる年度で使用できるコードを記述することが可能になります。

関連

DateAdd 関数 | DateDiff 関数

このページの先頭へ