如何自定义年份和月份？

ccczzz

要求1、自定义“年“，本年度的7月1日至下年度的6月30日为一个年度，例：2003-07-01至2004-06-30=2004年度。2、自定义“月“，自定义年度的第一个月为自定义月份的“1月“
最后一个月为自定义月份的12月，例：2003-07-01=年：2004，月：1；2003-12-03=年：2004，月：6；......2004-06-30=年：2004，月：12。3、自定义年和月分别为两个字段或一个字段。

wewyhy

自定义的二月份应该有31天还是27、28呢？
DATA()-183或 DATA()+183可不可以

ccczzz

月份的天数没有要求，我的要求是：将某个日期转换成一个自定义的日期，例1：2003-07-18=年：2004，月份：1。    例2： 2002-12-03=年：2003，月份：6。

[此贴子已经被作者于2003-7-18 13:12:46编辑过]

wewyhy

我想特殊日期会有毛病

Trynew

DateAdd函数当返回日期大于当月最大天数时取最后一天：
DateAdd（"m",1,#2003-01-30#)=#2003-02-28#
把加183天改为加6个月：
年：Year(DateAdd("m",6,日期)
月：Month(DateAdd("m",6,日期)

ccczzz

谢谢两位的指教。

chenghai

答案电子邮件发给你了。

ccczzz

邮件已收到，谢谢。