VBA Weekday 関数は、指定された日付の曜日番号 (1 から 7) を返します。
Weekday(日付)
また
Weekday(日付、週の最初の日)
デフォルトでは、週の最初の日は日曜日 (1)、最後の日は土曜日 (7) です。
月曜日が週の最初の日 (1)、日曜日が週の最後の日 (7) になるように番号付けを変更するには、この関数を使用するときに 2 番目の引数として値 2 を追加します。
Weekday(日付, 2)
Weekday 関数を使用して、複数の日付の曜日番号を表示します。
Sub WeekdayExample1()
MsgBox Weekday(#11/2/2020#, 2) '戻り値: 1
MsgBox Weekday("3.11.20", 2) '戻り値: 2
MsgBox Weekday("4 nov 2020", 2) '戻り値: 3
MsgBox Weekday("2020/5/11 17:30:21", 2) '戻り値: 4
End Sub
Weekday 関数を使用して平日と週末を区別します。
Sub WeekdayExample2()
If Weekday(Now, 2) < 6 Then
MsgBox "平日..."
Else
MsgBox "それは週末です!"
End If
End Sub