AccessのVBAで日付を曜日の文字列に変換

やり方

WeekdayName(Weekday("2022/01/02"))

Weekday() で曜日の数字に変換後、WeekdayName() に通す。

『日曜日』のように『曜日』の文字列がうしろに付いてくる。

Weekday() は数字のみの日付だと例外になるので注意。

動作確認サンプル

'スラッシュあり日付（ゼロ埋めあり）
'『日曜日』
Debug.Print WeekdayName(Weekday("2022/01/02"))

'スラッシュあり日付（ゼロ埋め無し）
'『日曜日』
Debug.Print WeekdayName(Weekday("2022/1/2"))

'スラッシュあり日付（月まで）
'この場合例外にならず2022/01/01（月初）の結果になる。
'『土曜日』
Debug.Print WeekdayName(Weekday("2022/1"))

'ハイフンあり日付（ゼロ埋めあり）
'『日曜日』
Debug.Print WeekdayName(Weekday("2022-01-02"))

'ハイフンあり日付（ゼロ埋め無し）
'『日曜日』
Debug.Print WeekdayName(Weekday("2022-1-2"))

'ハイフンあり日付（月まで）
'この場合例外にならず2022/01/01（月初）の結果になる。
'『土曜日』
Debug.Print WeekdayName(Weekday("2022-1"))

'数字のみ日付
'型が一致しませんの例外になる。
Debug.Print WeekdayName(Weekday("20221121"))

参考サイトさん

バージョン

Windows 10 Pro 21H2 OSビルド 19045.2311
Microsoft Access for Microsoft 365 MSO (バージョン 2209 ビルド 16.0.15726.20188) 32 ビット