VBA 時間間隔を取得するDatePart関数

スポンサーリンク

DatePart 【デイトパート】関数

指定した日付の同一年における時間間隔を整数値で取得するには、DatePart 【デイトパート】関数を使用します。時間間隔の単位は引数で指定することができます。

DatePart 【デイトパート】関数の書式と引数の説明

[]内は省略可能です。
DatePart (Interval , Date [, FirstDayOfWeek] [, FirstWeekOfYear])

  • Interval【インターバル】(必須)
    時間間隔の単位を表す定数を文字列式で指定します。

    引数 Interval に指定可能な定数一覧表
    設定値 内容
    yyyy
    q 四半期
    m
    y 年間通算日
    d
    w 週日
    ww
    h
    n
    s
  • Date【デイト】(必須)
    定時間間隔を取得したい日付や日付式を指定します。
  • FirstDayOfWeek【ファーストデイオフウィーク】(省略可)
    週の始まりの曜日を表す定数を指定します。省略した場合は、日曜日からになります。

    引数 FirstDayOfWeek に指定可能な定数一覧表<
    定数 内容
    vbUseSystem【ブイビーユーザーシステム】 0 各国語対応APIの設定値を使用
    vbSunday【ブイビイサンディ】 1 日曜日(既定値)
    vbMonday【ブイビイマンディ】 2 月曜日
    vbTuesday【ブイビイテュースディ】 3 火曜日
    vbWednesday【ブイビイウィインズディ】 4 水曜日
    vbThursday【ブイビイテュスディ】 5 木曜日
    vbFriday【ブイビイフライディ】 6 金曜日
    vbSaturday【ブイビイサタディ】 7 土曜日
  • FirstWeekOfYear【ファーストウィークオフイヤー】(省略可)
    年度の第 1 週を表す定数を指定します。省略した場合は、1 月 1 日を含む週が第 1 週になります。

    引数 FirstWeekOfYear に指定可能な定数一覧表
    定数 内容
    vbUseSystem
    【ブイビーユーザーシステム】
    0 各国語対応APIの設定値を使用
    vbFirstJan1
    【ブイビイジャニアリーワン】
    1 1 月 1 日を含む週を第1週とします。(既定値)
    vbFirstFourDays
    【ブイビイフォアディイズ】
    2 週の 4 日以上が含まれる最初の週を第1週とします。
    vbFirstFullWeek
    【ブイビイファーストフルウィーク】
    3 週の7 日が含まれる最初の週を第一週とします。

1月1日から本日までの経過を表示するコード例

Sub 経過()
MsgBox ("本日:" & Date & vbCrLf & _
"1月1日からの経過" & vbCrLf & _
"四半期:第" & DatePart("q", Date) & "四半期" & vbCrLf & _
"経過月:" & DatePart("m", Date) & "ヶ月" & DatePart("d", Date) & "日" & vbCrLf & _
"通算日:" & DatePart("y", Date) & "日" & vbCrLf & _
"週:" & DatePart("ww", Date) & "週目")
End Sub

実行結果


以上で、DatePart【デイトパート】関数についての解説を終了します。
ありがとうございました。

日付・時刻関数一覧表

日付や時刻の関数一覧表です。
関数名がリンクになっています。
クリックすると詳細説明ページが開きます。
関数名説明
Date現在の「日付」を取得します。
Year日付から「年」を取得します。
Month日付から「月」を取得します。
Day日付から「日」を取得します。
DatePart年・月・日を部分的に取得します。
Now現在の「日時」を取得します。
Time現在の「時刻」を取得します。
Hour時刻の「時」を取得します。
Minute時刻の「分」を取得します。
Second時刻の「秒」を取得します。
Weekday曜日を表す「整数値」を取得します。
WeekdayName曜日を表す整数値を「曜日名」に変換します。
DateSerial年・月・日を表す整数値から日付データに変換します。
TimeSerial時・分・秒を表す整数値から時刻データに変換します。
DateDiff日付や時間の間隔を計算します。
DateAdd時間を加算または減算した日付や時刻を取得します。
Timer経過した秒数を取得します。
CDateデータ型を日付型に変換します。
IsDate日付や時刻として扱えるかを調べます。
DDateValueateValue日付を表す文字列式を日付型(Date)に変換します。
TimeValueTimeValue時刻を表す文字列式を日付型(Date)に変換します。

スポンサーリンク

関連記事・広告