OfficeType

VBA~WorksheetFunction.NetworkDaysメソッド~Excel

VBAで開始日から終了日までの期間に含まれる稼動日の日数を求めたい場合はWorksheetFunction.NetworkDaysメソッドを使います。

書き方

WorksheetFunction.NetworkDays(開始日, 終了日, [祭日])

例として下の画像において下のコードを実行するとセルD2にプロジェクトの開始日から終了日までの土日祝日を除いた稼働日数が表示されます。

image-01

Sub test1()

Range("D2") = WorksheetFunction.NetworkDays(Range("A2"), Range("B2"), Range("C2:C4"))

End Sub

image-02