実動日数を計算するには？ (ID:78644)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 一応ソースは こう変わります。 HDayName(8) = "海の日" If intYear <= 2002 Then HDayList(8) = IIf(intYear <= 1995, 0, DateSerial(intYear, 7, 20)) Else TempDate = DateSerial(intYear, 7, 1) HDayList(8) = TempDate - Weekday(TempDate) _ + IIf(Weekday(TempDate) <= 2, 9, 23) End If HDayName(9) = "敬老の日" If intYear <= 2002 Then HDayList(9) = DateSerial(intYear, 9, 15) Else TempDate = DateSerial(intYear, 9, 1) HDayList(9) = TempDate - Weekday(TempDate) _ + IIf(Weekday(TempDate) <= 2, 16, 23) End If プロジェクトも修正して上げ直しました。 もしほかにも間違いがあったら教えてくださいm(__)m