【機能】
指定された日付の一部分を返します。
【構文】
DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
| 引数 |
内容 |
| interval |
必ず指定します。引数 date1 と引数 date2 の間隔を計算するための、時間間隔の単位を表す文字列式を指定します。設定する値については、次の「設定値」を参照してください。 |
| date |
必ず指定します。評価する日付式を指定します。 |
| firstdayofweek |
省略可能です。週の始まりの曜日を表す定数を指定します。省略すると、日曜日が指定されます。設定する値については、次の「設定値」を参照してください。 |
| 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
【必要条件】
バージョン 2