VBA - 周幾

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

語法

Weekday(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