ces005
If you do not want to rely on Analysis Toolpak, you still don't need VBA. Try this formula:
=DATE(YEAR(A1+1),MONTH(A1+1),1)-1
where A1 houses =TODAY()
This could be combined into a single formula:
=DATE(YEAR(TODAY()+1),MONTH(TODAY()+1),1)-1
though since TODAY() is a 'volatile' function, it is generally best to use it as few times as possible on a sheet.