Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

日付時刻：日付から曜日を取得（ Weekday 関数、WeekdayName 関数）

2015/04/19 2015/08/26

Weekday 関数（日付から曜日を表す数値を返す）の使い方

【書式】

weekday_number = Weekday ( date [, firstdayofweek ] )

引数・戻り値

date ・・・日付を表す文字列・数値を指定します。
firstdayofweek ・・・週の第 1 日目の曜日（定数：下表参照）を指定します。省略すると、定数 vbSunday を指定したとみなされます。
weekday_number ・・・何曜日であるかを表す整数を表すバリアント型 (内部処理形式 Integer) の値。1 ～ 7 の数値で、引数 firstdayofweek の値によって結果は変化します。（ firstdayofweek で指定した曜日を「1」とした結果を返します。）

引数の date が Null 値を含む場合は、Null 値を返します。

曜日を表す定数（ firstdayofweek ）

値	定数	内容
0	vbUseSystem	NLS（システムの各国対応）APIの設定値を使用
1（既定値）	vbSunday	日曜
2	vbMonday	月曜
3	vbTuesday	火曜
4	vbWednesday	水曜
5	vbThursday	木曜
6	vbFriday	金曜
7	vbSaturday	土曜

WeekdayName 関数（日付から曜日名を返す）の使い方

【書式】

weekday_string = WeekdayName ( weekday_number [, abbreviate, firstdayofweek ] )

引数・戻り値

weekday_number ・・・曜日を示す数値を指定します。各曜日を表す数値は、引数の firstdayofweek の設定値によって異なります。
abbreviate ・・・曜日名を省略するかどうかを示すブール値（ True：省略する／ False：省略しない）を指定します（省略可 ⇒ 規定値：False）
firstdayofweek ・・・週の第 1 日目の曜日（定数：Weekday 関数「曜日を表す定数」参照）を指定します。省略すると、定数 vbSunday を指定したとみなされます。
weekday_string ・・・地域ごとの曜日を表す文字列。
日本（abbreviate：False）：「日曜日」「月曜日」「火曜日」…「土曜日」
日本（abbreviate：True）：「日」「月」「火」…「土」

Weekday 関数、WeekdayName 関数

サンプルVBAソース

　
Sub Sample_Weekday()

    Dim MyDate1, MyDate2, MyWeekDay1, MyWeekDay2
    
    MyDate1 = #1/1/2000#
    MyDate2 = "2015/4/1"
    
    MyWeekDay1 = Weekday(MyDate1)           '週の第1日目の曜日は省略されているので日曜日
    MyWeekDay2 = Weekday(MyDate2, vbMonday) '週の第1日目の曜日は月曜日

    MsgBox MyWeekDay1 & "：" & WeekdayName(MyWeekDay1) & Chr(13) & _
           MyWeekDay2 & "：" & WeekdayName(MyWeekDay2, True, vbMonday)
           
    

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

　

Sub Sample_Weekday()

Dim MyDate1, MyDate2, MyWeekDay1, MyWeekDay2

MyDate1 = #1/1/2000#

MyDate2 = "2015/4/1"

MyWeekDay1 = Weekday(MyDate1) '週の第1日目の曜日は省略されているので日曜日

MyWeekDay2 = Weekday(MyDate2, vbMonday) '週の第1日目の曜日は月曜日

MsgBox MyWeekDay1 & "：" & WeekdayName(MyWeekDay1) & Chr(13) & _

MyWeekDay2 & "：" & WeekdayName(MyWeekDay2, True, vbMonday)

End Sub

　

実行結果

- VBA基本 VBA基本, weekday 関数, weekdayname 関数, エクセルVBA, 曜日取得

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 式の値に応じて多分岐を行う（Switch 関数）

Switch 関数の使い方 Switch 関数は、「式・値」を対にして指定して …

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: 出力位置、書き込み位置を設定（Tab 関数）

出力位置、書き込み位置を設定 Tab 関数は、Print メソッド、または P …

: 文字列：文字を指定数並べた文字列を返す（String 関数）

String 関数【書式】 result = String ( number, …

: 指定した数値に対応する選択肢の値・数式を返す（Choose 関数）

Choose 関数の使い方 Choose 関数は、指定されたインデックス値（１ …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

: 文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）

Mid・MidB ステートメントの使い方【書式】 { Mid | MidB } …

: オブジェクトの書式をクリアする（ClearFormats メソッド）

ClearFormats メソッド対象となるオブジェクトの書式（スタイル）を初 …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 指定した文字列を数値に変換する（Val 関数）

Val 関数の使い方 Val 関数は、指定した文字列に含まれる数字を数値として …

PREV: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）
NEXT: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）