VBA で指定した日付の曜日を取得するには Format 関数を使用します。Format関数は第1引数に日付の文字列を、第2引数に書式を渡します。具体的なサンプルコードをご紹介します。
|
1 2 3 4 5 6 |
Sub main() MsgBox Format("2011/05/18", "aaa") '「水」と表示されます。 MsgBox Format("2011/05/18", "aaaa") '「水曜日」と表示されます。 MsgBox Format("2011/05/18", "w") '「4」と表示されます。 End Sub |
4行目
書式に「w」を指定すると、曜日の番号が返されます。デフォルトでは日曜日を1として、月曜日が2、火曜日が3・・・土曜日が7と続きます。第3引数に定数を渡すことによって、スタートの曜日を変更することができます。Format関数の仕様に関して下記の記事が参考になりました。
Office TANAKA – Excel VBA関数[Format関数]
http://officetanaka.net/excel/vba/function/Format.htm