DatePart 関数
指定された日付の一部分を返します。
DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
引数
- interval
必ず指定します。時間間隔の単位を表す文字列式を指定します。設定する値については、次の「設定値」を参照してください。 - date
必ず指定します。評価する日付式を指定します。 - firstdayof week
省略可能です。週の始まりの曜日を表す定数を指定します。省略すると、日曜日が指定されます。設定する値については、次の「設定値」を参照してください。 - firstweekofyear
省略可能です。年度の第 1 週を表す定数を指定します。省略すると、1 月 1 日を含む週が第 1 週と指定されます。設定する値については、次の「設定値」を参照してください。
設定値
引数 interval の設定値は次のとおりです。
設定値 | 内容 |
---|---|
yyyy | 年 |
q | 四半期 |
m | 月 |
y | 年間通算日 |
d | 日 |
w | 週日 |
ww | 週 |
h | 時 |
n | 分 |
s | 秒 |
引数 firstdayofweek の設定値は次のとおりです。
定数 | 値 | 内容 |
---|---|---|
vbUseSystemDayOfWeek | 0 | 各国語対応 (NLS) API の設定値を使用します。 |
vbSunday | 1 | 日曜 (既定値) |
vbMonday | 2 | 月曜 |
vbTuesday | 3 | 火曜 |
vbWednesday | 4 | 水曜 |
vbThursday | 5 | 木曜 |
vbFriday | 6 | 金曜 |
vbSaturday | 7 | 土曜 |
引数 firstweekofyear の設定値は次のとおりです。
定数 | 値 | 内容 |
---|---|---|
vbUseSystem | 0 | 各国語対応 (NLS) API の設定値を使用します。 |
vbFirstJan1 | 1 | (既定値) 1 月 1 日を含む週を年度の第 1 週として扱います。 |
vbFirstFourDays | 2 | 7 日のうち少なくとも 4 日が新年度に含まれる週を年度の第 1 週として扱います。 |
vbFirstFullWeek | 3 | 全体が新年度に含まれる最初の週を年度の第 1 週として扱います。 |
解説
DatePart 関数を使うと、日付を評価し、特定の時間間隔部分を取得できます。たとえば、週日や現在の時刻などを計算できます。
引数 firstdayofweek は、引数 interval に週 ("w" および "ww") を指定した場合の計算値に影響します。
引数 date に日付リテラルを指定した場合、指定した年が日付の固定部分となります。ただし、引数 date をダブル クォーテーション (") で囲み、年を省略すると、引数 date の式が評価されるたびにコードに現在の年が挿入されます。これを利用すると、異なる年度で使用できるコードを記述することが可能になります。
次のコードは、DatePart 関数を使って日付を取得し、その四半期を表示します。
Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function