10-21-2009, 07:24 PM
Hi,
Try this...
Try this...
Code:
Dim TmpDate, NewDate
TmpDate = DateAdd("mm", 1, Date)
NewDate = DateSerial(Year(TmpDate), Month(TmpDate), 1)