OfficeType

VBA~WorksheetFunction.WorkDayメソッド~Excel

VBAで開始日から起算して指定された稼動日数後の日付を計算したい場合はWorksheetFunction.WorkDayメソッドを使います。

書き方

WorksheetFunction.WorkDay(開始日, 日数, [祝日])

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

image-01

Sub test1()

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

End Sub

image-02