vba 判断 星期几

在 VBA 中，可以使用 Weekday 函数来判断某个日期是星期几。

Weekday 函数的语法如下：

Weekday(date[, firstdayofweek])
其中，date 是要判断的日期，firstdayofweek 是一个可选参数，用于指定一周的第一天是哪一天。如果不指定，则默认为 Sunday（星期日）。
Weekday 函数会返回一个整数值，表示 date 对应的星期几。具体返回值与 firstdayofweek 参数的取值有关，通常是这样的：
1：星期日
2：星期一
3：星期二
4：星期三
5：星期四
6：星期五
7：星期六
以下是一个示例代码，用于判断今天是星期几：
Sub GetWeekday()
    Dim today As Date
    today = Date
    MsgBox "今天是星期" & Weekday(today, vbMonday)
End Sub
在上面的代码中，使用 Date 函数获取了当前日期，然后调用 Weekday 函数来获取今天是星期几。由于我指定了第一天是星期一，因此 Weekday 函数返回值从 1 到 7 对应的是星期一到星期日。
希望这个回答对您有帮助！