< スポンサーリンク >

Excel VBA 日付から日本語の曜日を取得する

Excel VBAで日本語の曜日を取得するには「WeekdayName 関数」を使います。

 

構文

WeekdayName(weekday[,abbreviate][,firstdayofweek])

weekday = 曜日を示す数値(Weekday関数で取得した数値など)を指定
abbreviate = 曜日名を省略するときはTrueを指定 省略可能
firstdayofweek = 曜日の最初の日を示す数値を指定 省略可能(私は使用しません)

引数のfirstdayofweekは、下記の値で指定できます。

定  数 内容
vbUseSystem 0 各国語対応APIの設定値を使用
vbSunday 1 日曜(規定値)
vbMonday 2 月曜
vbTuesday 3 火曜
vbWednesday 4 水曜
vbThursday 5 木曜
vbFriday 6 金曜
vbSaturday 7 土曜

 

曜日を日本語で取得する

2018/12/1の曜日名を取得してみます。

2018/12/1は土曜日なので、abbreviateを指定しなければ「土曜日」がメッセージで表示され、abbreviateをFalse(または省略)を指定すると「土」がメッセージで表示されます。

Sub test()
    Dim hi As Date
    hi = #12/1/2018#
    MsgBox WeekdayName(Weekday(hi))
End Sub

VBAWeekdayName関数

VBAWeekdayName関数

 

Sub test()
    Dim hi As Date
    hi = #12/1/2018#
    MsgBox WeekdayName(Weekday(hi), True)
End Sub

VBAWeekdayName関数

VBAWeekdayName関数

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ