OfficeType

VBA~WorksheetFunction.WeekNumメソッド~Excel

VBAで配日付がその年の第何週目になるかを求めたい場合はWorksheetFunction.WeekNumメソッドを使います。

書き方

WorksheetFunction.WeekNum(日付, [週の基準])

[週の基準]は週の始まりを何曜日にするか指定します。基準の番号は以下の曜日に対応しています。

週末番号
  • 1または省略 日曜日
  • 2 月曜日
  • 11 月曜日のみ
  • 12 火曜日のみ
  • 13 水曜日のみ
  • 14 木曜日のみ
  • 15 金曜日のみ
  • 16 土曜日のみ
  • 17 日曜日のみ

例として下の画像において下のコードを実行すると2022/2/22は2022年の第9週目なのでセルB2に9と表示されます。

image-01

Sub test1()

Range("B2") = WorksheetFunction.WeekNum(Range("A2"))

End Sub

image-02