VBA WeekdayName 関数は、番号に基づいて曜日の名前を返します。
曜日名(日付)
また
WeekdayName(日付、週の最初の日)
デフォルトでは、週の最初の日は日曜日 (1)、最後の日は土曜日 (7) です。
月曜日が週の最初の日 (1)、日曜日が週の最後の日 (7) になるように番号付けを変更するには、この関数を使用するときに 2 番目の引数として値 2 を追加します。
曜日名(日付, 2)
WeekdayName 関数を使用して 7 日間の名前を表示します。
Sub WeekdayNameExample1() MsgBox WeekdayName(1) '返却日:月曜日 MsgBox WeekdayName(2) '返却日: 火曜日 MsgBox WeekdayName(3) '返却日:水曜日 MsgBox WeekdayName(4) '返却日:木曜日 MsgBox WeekdayName(5) '返却日:金曜日 MsgBox WeekdayName(6) '返却日:土曜日 MsgBox WeekdayName(7) '返却日:日曜日 End Sub
WeekdayName 関数は、2 番目の引数として値を渡すことで、その日の短縮版を表示することもできます。
Sub WeekdayNameExample2() MsgBox WeekdayName(1, True) '返却日:月曜日 MsgBox WeekdayName(2, True) '返却日:火曜日 MsgBox WeekdayName(3, True) '返却日:水曜日 MsgBox WeekdayName(4, True) '返却日:木曜日 MsgBox WeekdayName(5, True) '返却日:金曜日 MsgBox WeekdayName(6, True) '返却日:土曜日 MsgBox WeekdayName(7, True) '返却日: 日曜日。 End Sub
Weekday 関数と WeekdayName 関数を使用すると、日付から曜日の名前を取得できます。
Sub WeekdayNameExample3() MsgBox WeekdayName(Weekday("2020/11/30", 2)) '返却日:月曜日 End Sub
ただし、書式設定関数 FORMAT を直接使用する方が簡単です。
Sub WeekdayNameExample4() MsgBox Format("2020/11/30", "dddd") '返却日:月曜日 End Sub