View Single Post
 
Old 04-30-2014, 03:45 PM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,467
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

In F3, try:
=TEXT(DATE(YEAR(TODAY()),MONTH(TODAY())+MOD(DATEDI F(DATE(YEAR(TODAY()),MONTH(TODAY()),1),DATE(YEAR(T ODAY())+1,MONTH(DATEVALUE("1-"&$E3&"-"&YEAR(TODAY())))+1,0),"ym"),(12/2^($D3-1))),1),"MMM")
then copy down as far as needed.

PS: As previously advised, the board software puts spaces in the formula where there shouldn't be any. In this case, 'DATEFI F' is 'DATEDIF' and 'T ODAY()' is 'TODAY()'

Note: If you change the cell format, to 'mmm', you could reduce the formula to:
=DATE(YEAR(TODAY()),MONTH(TODAY())+MOD(DATEDIF(DAT E(YEAR(TODAY()),MONTH(TODAY()),1),DATE(YEAR(TODAY( ))+1,MONTH(DATEVALUE("1-"&$E3&"-"&YEAR(TODAY())))+1,0),"ym"),(12/2^($D3-1))),1)
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote