Vba-weekday-function

提供:Dev Guides
移動先:案内検索

VBA-WeekDay

WeekDay関数は、指定された日付の曜日を表す1〜7の整数を返します。

構文

Weekday(date[,firstdayofweek])

パラメータ説明

  • 日付-必須パラメーター。 平日は指定された日付を返します。
  • Firstdayofweek -オプションのパラメーター。 週の最初の日を指定します。 次の値を取ることができます。
  • 0 = vbUseSystemDayOfWeek-各国語サポート(NLS)API設定を使用
  • 1 = vbSunday-日曜日
  • 2 = vbMonday-月曜日
  • 3 = vbTuesday-火曜日
  • 4 = vbWednesday-水曜日
  • 5 = vbThursday-木曜日
  • 6 = vbFriday-金曜日
  • 7 = vbSaturday-土曜日

ボタンを追加し、次の関数を追加します。

Private Sub Constant_demo_Click()
   msgbox("Line 1: " & Weekday("2013-05-16",1))
   msgbox("Line 2: " & Weekday("2013-05-16",2))
   msgbox("Line 3: " & Weekday("2013-05-16",2))
   msgbox("Line 4: " & Weekday("2010-02-16"))
   msgbox("Line 5: " & Weekday("2010-02-17"))
   msgbox("Line 6: " & Weekday("2010-02-18"))
End Sub

上記の関数を実行すると、次の出力が生成されます。

Line 1: 5
Line 2: 4
Line 3: 4
Line 4: 3
Line 5: 4
Line 6: 5