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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 列挙型変数（Enum ステートメント）

列挙型変数を使う列挙型変数を使用するには、Enum ステートメントを使って、宣 …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

DateDiff 関数の使い方【書式】 result = DateDiff ( …

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

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

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

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）

論理演算子論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …

: 変数がNull 値かどうかをチェックする（ IsNull 関数）

IsNull 関数の使い方【書式】 result = IsNull ( exp …

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

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

: 連想配列（Dictionary オブジェクト）

連想配列連想配列とは、添字（キー）に文字列を使用することができる配列です。 V …

: VBA で正規表現を使う（RegExp オブジェクトのプロパティ）

RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …

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