VBA WeekDay()函式

WeekDay()函式返回一個從1到7的整數，表示指定日期的星期幾。

語法

Weekday(date[,firstdayofweek])

引數

• date - 必需的引數。星期幾將返回指定的日期。
• 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