月数で期間計算 (ID:119711)

名前

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

本文 試してないけど、これではだめですか？ ' 月数を計算する GetMonthDiff = DateDiff("m", dtStart, dtEnd) If GetMonthDiff = 0 Then ' 開始日、終了日の日数差を計算する nDaySpan = DateDiff("d", dtStart, dtEnd) GetMonthDiff = (nDaySpan + 1) / nDay End If