PDA

Click to See Complete Forum and Search --> : End of month Function


Pearso
Jul 14th, 2005, 08:27 PM
Hello everyone,

I need some help or for someone to point me in the right direction. I would like to create a function in VBA that will return the last day of the month when a date is passed to it. It needs to be accurate for all years including leap years. I know that excel treats dates as numbers. Does this mean that i have to have heaps of if functions and say if the data is between x and y then z is the end of the month. I can't think of any other way to do it. Does anyone have an pointers for me. Thanks in advance.

RobDog888
Jul 14th, 2005, 08:46 PM
This will get the last day of any month and eyar, etc
MsgBox DateAdd("d", -Day(DateAdd("m", 1, Date)), DateAdd("m", 1, Date))