本帖最后由 mosz 于 2012-3-21 12:45 编辑
特别感谢六楼的年华同学,仔细看了帮助后,获益良多,很久没有关注,才发现自己的方法复杂到几点,现整理出简洁方法,展现给大家,再次感谢。
效果:
例如:2012-03-20;输出为:二〇一二日三月二十日
方法一:(适用于6.5、7.0版本)
设计器单元格:
A1:=FORMAT(TODAY(),"yyyy-MM-dd")
A2:=REPLACE(NUMTO(YEAR(A1),true),"零","〇")+"年"+NUMTO(MONTH(A1),false)+"月"+NUMTO(DAY(A1),false)+"日"
PS:使用中文日期,直接调用A2单元格即可,或者在A1单元格的公式形态里设置A2的公式。
方法二:(适用于6.2等老版本)
设计器单元格:
A1:=FORMAT(TODAY(),"yyyy-MM-dd")
A2:=if(LEN(MID(A1,1,1))>0,if(MID(A1,1,1)!=0,NUMTO(TOINTEGER(MID(A1,1,1))),"〇"),"〇")
A3:=if(LEN(MID(A1,2,1))>0,if(MID(A1,2,1)!=0,NUMTO(TOINTEGER(MID(A1,2,1))),"〇"),"〇")
A4:=if(LEN(MID(A1,3,1))>0,if(MID(A1,3,1)!=0,NUMTO(TOINTEGER(MID(A1,3,1))),"〇"),"〇")
A5:=if(LEN(MID(A1,4,1))>0,if(MID(A1,4,1)!=0,NUMTO(TOINTEGER(MID(A1,4,1))),"〇"),"〇")
A6:=if(LEN(MID(A1,6,1))>0,if(MID(A1,6,1)==0,"",if(MID(A1,6,1)==1,"十",if(MID(A1,6,1)==2,"二十",if(MID(A1,6,1)==3,"三十","")))),"")
A7:=if(LEN(MID(A1,7,1))>0,NUMTO(TOINTEGER(MID(A1,7,1))),"")
A8:=if(LEN(MID(A1,9,1))>0,if(MID(A1,9,1)==0,"",if(MID(A1,9,1)==1,"十",if(MID(A1,9,1)==2,"二十",if(MID(A1,9,1)==3,"三十","")))),"")
A9:=if(LEN(MID(A1,10,1))>0,NUMTO(TOINTEGER(MID(A1,10,1))),"")
A10:=CONCATENATE(A2,A3,A4,A5,"年",A6,A7,"月",A8,A9,"日")
PS:使用中文日期时,直接调用A10单元格就可以了,小小技巧,免费共享,希望能减少大家在设计过程中的小麻烦,期望得到大家的分享,共同提高。