Adding dates

Hi All

I would like to write a VBA CODE to add years for a particular date. For example if the start date is 01/07/2013 in A1 and if there is 2("YEARS") in B2. It should give the value 30/06/2015. The issue here is the value in A1 should only change when there is a change in the month. It should get updated only in august 01/08/2013 likewise for the coming months.

So the A1 should only change on the first day of the month.

Any help ?

Thanx :)