月末日を取得するユーザー定義関数 Hit Counter

対象バージョン : 97, 2000, 2002, 2003, 2007
最終更新日 : 2007/02/12 (オリジナル作成日 : 1999/02/03)


概 要

与えられた年・月から、その月の月末日を取得するユーザー定義関数です。

 

構 文

 MonthEnd(Year, Month)

解 説

MonthEnd 関数の戻り値は日付型 (Date)です。

MonthEnd 関数では次の引数を使用します。

引 数 内     容
Year 年を示す数字式で指定します。
Month 月を示す数字式で指定します。

 

ユーザー定義関数

Public Function MonthEnd(argYear As Integer, argMonth As Integer) As Date
MonthEnd = DateAdd("d", -1, DateAdd("m", 1, DateSerial(argYear, argMonth, 1)))
End Function

使 用 例

Getumatu = MonthEnd(1999, 2)
Getumatu = MonthEnd(Year(Now), Month(Now)) ' システム日付の当月末

 

改定履歴


目次へ戻る