by Newsgroup Posting (15 Submissions)
Category: Math/Dates
Compatability: Visual Basic 3.0
Difficulty: Unknown Difficulty
Date Added: Wed 3rd February 2021
Rating: (3 Votes)
Last day of the month
Calculates the last day of the month.
"Jim Doherty"
Function EndOfMonth (D As Variant) As Variant
EndOfMonth = DateSerial(Year(D), Month(D) + 1, 0)
End Function