DateAdd(interval, number, date) returns a Variant/Date containing the date of the specified interval after the specified date
Sub dateDemo2() Debug.Print DateAdd("m", 1, "6/3/06"); returns; 7 / 3 / 2006# End Sub