在Excel VBA中,可以使用Weekday函数来判断星期几。
Weekday函数的语法如下:
Weekday (Date, [FirstDayOfWeek])
其中,Date是指要判断的日期,[FirstDayOfWeek]是可选的,表示一周的第一天是周几。
如果[FirstDayOfWeek]参数省略,默认是vbSunday,也就是周日为一周的第一天。
下面是一个例子:
Dim today As Date today = Date Select Case Weekday(today) Case 1 MsgBox "今天是周日" Case 2 MsgBox "今天是周一" Case 3 MsgBox "今天是周二" Case 4 MsgBox "今天是周三" Case 5 MsgBox "今天是周四" Case 6 MsgBox "今天是周五" Case 7 MsgBox "今天是周六" End Select
这段代码实现了判断今天是周几的功能。