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
< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします
こんな記事も書いています