VBAで日付の曜日を取得する

VBA

VBAで日付から曜日を取得するにはWeekday関数を使用します。
Weekday関数

コードは以下になります。

 

Weekday関数を使用する前に、IsDate関数を使用して
引数dを日付として認識できるか確認しています。
IsDate関数

日付として認識できないときは、Weekday関数で
処理を行いません。

引数dを日付として認識できるときは、Weekday関数を使用します。
Weekday関数に日付を渡すと以下の値が返されます。

定数 説明
vbSunday 1 日曜日
vbMonday 2 月曜日
vbTuesday 3 火曜日
vbWednesday 4 水曜日
vbThursday 5 木曜日
vbFriday 6 金曜日
vbSaturday 7 土曜日

 

返された数値をCase文で条件分岐し、処理しています。
getWeekDay(“2018/7/1”) → 1 → 日曜日

 

getWeekDay(“2018/7/12”) → 5 → 木曜日

 

getWeekDay(123456) → 日付として認識できない

 

getWeekDay(“あ”) → 日付として認識できない

コメント