【自作関数】月末の日付を取得
引数で渡した日付から月末日を取得する。
Public Function cmnfunc_getEndOfMonth(ByVal datDate As Date) As Date
cmn_getEndOfMonth = DateSerial(Year(datDate), Month(datDate) + 1, 0)
End Function引数で渡した日付から月末日を取得する。
Public Function cmnfunc_getEndOfMonth(ByVal datDate As Date) As Date
cmn_getEndOfMonth = DateSerial(Year(datDate), Month(datDate) + 1, 0)
End Function