View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
curiosity_killed_the_cat[_2_] curiosity_killed_the_cat[_2_] is offline
external usenet poster
 
Posts: 11
Default A curly date problem

Thanks Mike

Works a treat, I had something close to that, but not close enough.

BTW for others reading I had to alter the seperator in the mmmyyyy from : to
- to have the sheet name function work properly

"Mike H" wrote:

Maybe

=IF(A4="","EMPTY",IF(J1D1,"Expired
"&TEXT(DATE(YEAR(D4),MONTH(D4),DAY(D4)),"mmm:yyyy" ),DATE(YEAR(D4),MONTH(D4),DAY(D4))))

Alter the date format to suit your needs

Mike

"curiosity_killed_the_cat" wrote:

I have the following formula

=IF(A4="","EMPTY",IF(J1D1,"Expired
"&DATE(YEAR(D4),MONTH(D4),DAY(D4)),DATE(YEAR(D4),M ONTH(D4),DAY(D4))))

This is used to name the work sheet. When false is the result it returns the
date as mmm-yyyy which in turn names the sheet using a macro, and it works
fine.

The true result works, almost, it returns "Expired+the date as a serial #",
minus the quotes, and no matter what I do I can't get it to return "Expired
mmm-yyyy". Is it possible to get the false result as "Expired mmm-yyyy"
instead of the serial date?

J1 has the today() formula
D1 is a date entered by the user in dd/mm/yy format

Hope I made sense

Thanks