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