Excel VBAで曜日を取得する方法の記録です。
曜日を取得するには「Weekday」関数を使います
< スポンサーリンク >
「Weekday」関数構文
Weekday(date[,firstdayofweek])
date = 曜日を取得したい日付
firstdayofweek = 週の最初の曜日を指定 省略可能(省略した場合、1(日曜)~7(土曜)の値で取得されます)
引数のfirstdayofweekは、下記の値で指定できます。
定 数 | 値 | 内容 |
---|---|---|
vbUseSystem | 0 | 各国語対応APIの設定値を使用 |
vbSunday | 1 | 日曜(規定値) |
vbMonday | 2 | 月曜 |
vbTuesday | 3 | 火曜 |
vbWednesday | 4 | 水曜 |
vbThursday | 5 | 木曜 |
vbFriday | 6 | 金曜 |
vbSaturday | 7 | 土曜 |
Weekday関数を実行すると、下記の値が返ってきます。
定 数 | 値 | 内容 |
---|---|---|
vbSunday | 1 | 日曜(規定値) |
vbMonday | 2 | 月曜 |
vbTuesday | 3 | 火曜 |
vbWednesday | 4 | 水曜 |
vbThursday | 5 | 木曜 |
vbFriday | 6 | 金曜 |
vbSaturday | 7 | 土曜 |
VBAで曜日を取得する例
2018/12/1の曜日を取得してみます。
2018/12/1は土曜日なので、7がメッセージで表示されます。
Sub test()
Dim hi As Date
hi = #12/1/2018#
MsgBox Weekday(hi)
End Sub
こんな記事も書いています