曜日を取得する。
weekday関数
戻り値は数値
weekday関数
戻り値は数値
0は日曜日
1は月曜日
2は火曜日
3は水曜日
4は木曜日
5は金曜日
6は土曜日
という意味ですがわかにくい。
1は月曜日
2は火曜日
3は水曜日
4は木曜日
5は金曜日
6は土曜日
という意味ですがわかにくい。
そこで数値を引数として取得して日本語の名前に変える関数
WeekdayName関数
戻り値は日曜日という書式で取得できる。
WeekdayName関数
戻り値は日曜日という書式で取得できる。
今日の曜日を取得して日本語でセルに出力したサンプル
わかり難いなら数値の所をvbSunday等の組込み関数に置き換えでもいい。
曜日ごとの処理を分けなくていいなら1行でこの場合書けるけどね。
Range(“A1”) = WeekdayName(Weekday(Date))
サンプルソース
——————————————–
Option Explicit
Sub start()
——————————————–
Option Explicit
Sub start()
Select Case Weekday(Date)
Case 0
Range(“A1”) = WeekdayName(0)
Case 1
Range(“A1”) = WeekdayName(1)
Case 2
Range(“A1”) = WeekdayName(2)
Case 3
Range(“A1”) = WeekdayName(3)
Case 4
Range(“A1”) = WeekdayName(4)
Case 5
Range(“A1”) = WeekdayName(5)
Case 6
Range(“A1”) = WeekdayName(6)
End Select
End Sub
——————————————–
実行結果
月曜日（今日の曜日）
