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